Составить программу на языке паскаль, которая запрашивает у пользователя некоторое число (число больше 9 и меньше 30000) и выводит на экран последнюю цифру числа (цифру в самом младшем разряде числа) прошу не в коем случае не используй их: last, const, count. делай обыкновенным способом.
247
393
Ответы на вопрос:
Var a: integer; begin writeln('введите число'); readln(a); if a> 9 then if a< 30000 then writeln(a mod 10) else writeln('ошибка. вы указали неверное число') else writeln('ошибка. вы указали неверное число'); end. пример: ввод - 5609 вывод - 9
var
a, b, c, d: integer;
begin
writeln('введите трехзначное число');
readln(a);
b : = a div 100;
c : = a div 10 mod 10;
d : = a mod 10;
writeln(b, ', ', c, ', ', d);
end.
Популярно: Информатика
-
deadraccoon2026.06.2023 19:03
-
Черепашка31204.05.2023 08:57
-
milk05122.08.2021 02:20
-
Mishka051222.05.2023 03:12
-
Маркизетта09.10.2020 00:06
-
nataly16305.02.2020 18:50
-
вита432124.11.2021 11:11
-
masha00700910.09.2021 23:46
-
Ракита022.03.2020 12:14
-
ftf313.10.2020 07:27