на паскале дано а оканчивается ли оно на 7 через мод напишите решение

Question

Информатика

Фира

2 декабря, 07:12

на паскале дано а оканчивается ли оно на 7 через мод напишите решение

+2

Ответы (1)

Знаете ответ на вопрос?

Алеха · Answer 1

var

a:integer;

begin

write ('a = ') ;

readln (a) ;

if a mod 10 = 7 then

writeln ('число оканчивается 7')

else

writeln ('число не оканчивается 7') ;

readln;

end.