Дано двузначное число, определить, кратны ли единицы этого числа 5

Question

Информатика

Артемчик

21 мая, 04:17

Дано двузначное число, определить, кратны ли единицы этого числа 5

+5

Ответы (1)

Знаете ответ?

Надюня · Answer 1

var

a:integer;

begin

write ('Введите двузначное число: ') ;

readln (a) ;

if a mod 5 = 0

then writeln ('Кратны')

else writeln ('Не кратны') ;

end.