tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
2. с клавиатуры вводится
2. с клавиатуры вводится трёхзначное число. вывести на экран двузначное число, состоящее из первой и последней цифры введенного числа. пример: ввели число 672. выводим на экран число 62.
valenkov05
1 22.07.2019 21:10
1
Ответы
irna200
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
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
artem0941
30.07.2019 13:30
Переведите число 183 из десятичной системы счисления в двоичную, восьмеричную,шестнадцатеричную....
aruukealtymysh
27.01.2021 14:27
кереккк, нужноо умоляюю кітапханасы қандай әрекеттерді орындау үшін керектігін анықта. логарифмдік операцияларбелгілер мен таңбаларлатын әріптеріарифметикалық амалдар...
лол1570
27.01.2021 14:29
Используя одну процедуру постоить процедуру надо, не понимаю как ...
adamabiev
27.01.2021 14:30
Необходимо вывести последовательность нечетных чисел от 0 до 20. Выберите верно составленный диапазон * for i in range(0, 20, 2): for i in range(1, 20, 2): for i in range(0, 21, 2)...
karina211206
27.01.2021 14:31
Необходимо вывести последовательность чисел от 0 до 100, кратных 5. Выберите верно составленный диапазон * for i in range(0, 100, 5): for i in range(1, 100, 5): for i in range(0, 101,...
Anasstezz
27.01.2021 14:32
1. Знайдіть помилку в наступних фрагментах програм: beginy: =0; for x: =0.1 to 9 do y: = y+ sqr(x); end;2. begin m:=4; for y:=9 to 1 do begin f:=m+2+y; writeln( f= ,f); end; readln;...
1256545544
27.01.2021 14:33
Сызықтық алгоритмдерді программалау Квадрат түбірді табу үшін қандай функция қолданылатынын көрсет. pow(х, у) degrees(у) radians(х) sqrt(у)...
Хцжцэ
27.01.2021 14:34
Построить логические схемы функций F=A+неВ F=A*B*C F=не(A+B)*(A*B)...
anita4566
27.01.2021 14:35
Используя функцию randon (x) , получите числа в диопозонах от :1 до 10 от -10 до +10 от 50 до 100...
alinnnkaaa
27.01.2021 14:37
Как называется сервисы, предоставляющие услуги платформы с По?...
Популярные вопросы
помагите можно написать решение и условие задачи помагите умоляю!(((...
2
Қалай ойлайсыңдар, көкпар ойыны салт-дәстүрге қалай айналған? Қазақстан тарихи...
3
СОР ПО ИСТОРИИ КЗ,ПЕРВОЕ ЗАДАНИЕ ТОЛЬКО. я уже много потратила но никто не отвечает...
1
Aufgabe 7. Замените подчекнутое личное местоимение существительным, стоящим в скобках...
3
Сочинение Пейзаж в музыке, литературе, изобразительном искусстве....
2
3.Бір суретті таңдап алып, сол бойынша әңгіме құрастыр. ...
2
Яка килькисть речовын мистится в 14 кг литию...
3
Вказати номер періоду та групи в яких розташован ge ( германий ) 1) 2,4 2) 4,4 3)...
1
Не себепті адамға дос керек деп ойлайсыңдар? деген тақырыпқа пікір білдіріп, 2...
3
Упрости выражение sin^4t+2sin^2t⋅cos^2t+cos^4t ....
3
begin
write('n = '); readln(n);
m:=(n div 100 * 10) + n mod 10;
writeln('m = ',m);
end.
Пример:
n = 672
m = 62