на паскале дано а оканчивается ли оно на 7 через мод напишите решение
var
a:integer;
begin
write(a = );
readln(a);
if a mod 10 = 7 then
writeln(число оканчивается 7)
else
writeln(число не оканчивается 7);
readln;
end.
Оцени ответ
Вход
Регистрация
Задать вопрос
на паскале дано а оканчивается ли оно на 7 через мод напишите решение
var
a:integer;
begin
write(a = );
readln(a);
if a mod 10 = 7 then
writeln(число оканчивается 7)
else
writeln(число не оканчивается 7);
readln;
end.