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

Question

Информатика

Соррел

28 августа, 12:26

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

+2

Ответы (1)

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

Арнада · Answer 1

var

a: integer;

begin

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

readln (a) ;

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

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

end.