Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
прорппп
30.07.2022 08:21 •
Информатика
2. с клавиатуры вводится трёхзначное число. вывести на экран двузначное число, состоящее из первой и последней цифры введенного числа. пример: ввели число 672. выводим на экран число 62.
Ответ:
varenik506
03.10.2020 11:09
Var n,m:integer;
begin
write('n = '); readln(n);
m:=(n div 100 * 10) + n mod 10;
writeln('m = ',m);
end.
Пример:
n = 672
m = 62
0,0
(0 оценок)
Популярные вопросы: Информатика
Sadovnik11
22.12.2021 03:07
Составить программу в паскале f(x)=sin1/x+2...
момалог
22.12.2021 03:07
(по тождествам булевой ) if (а*notb) then not с...
Remus1
07.06.2022 06:35
Вычеслить значения следующих выражений записанных на языке Паскаль. а) sqr(trunc(4.95))...
nikitkasorokin2
04.12.2020 16:27
риведена таблица. 1) Определите формулу ячейки А2 при копировании формулы из ячейки А1 2) Определите значение ячейки А2...
kyvsaar
28.04.2022 11:53
8. Дано координати трьох вершин прямокутника А(-2;1), В(3;1), С(33- 2). А) Накресліть цей прямокутник (довжина одиничного вірака коордннатних осей дорівнюе 1 см). Б) Знайдіть...
samsungtaba32
28.04.2022 11:53
доклад на тему религия ислам 8-10 прежложений...
Nikakrmararle
28.04.2022 11:53
Почему серную кислоту можно лить в воду, а воду в серную кислоту-нет?...
denglushakov1
22.03.2020 16:58
Определите значение переменной b после выполнения следующего фрагмента программы: a:= 255; b := a mod 10; a := b div 2; b:= b - a;...
альбина346
22.03.2020 16:58
З чим пов язана низька солоність північного льодовитого океану...
dvoeshnik101
22.03.2020 16:58
(Хочу перевірити, дайте відповідь на запитання) - украинский (Хочу проверить, дайте ответ не во русский будь-ласка...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
begin
write('n = '); readln(n);
m:=(n div 100 * 10) + n mod 10;
writeln('m = ',m);
end.
Пример:
n = 672
m = 62