Напишите программу, позволяющую определить, введенное число делиться на 5 или нет.

Question

Информатика

Баппуш

29 января, 05:35

Напишите программу, позволяющую определить, введенное число делиться на 5 или нет.

+3

Ответы (1)

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

Андрейц · Answer 1

var

a: integer;

begin

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

readln (a) ;

if a mod 5 = 0 then write ('Число ', a, ' делится на 5.')

else write ('Число ', a, ' не делится на 5.') ;

end.