Ответы
Ответ дал:
0
var
numb: integer;
begin
Write(‘Введите число=‘);
Readln(numb);
if (numb mod 5 = 0) then
wtiteln(‘Число кратно 5’)
else
writeln(‘Число не кратно 5);
Readln;
end.
numb: integer;
begin
Write(‘Введите число=‘);
Readln(numb);
if (numb mod 5 = 0) then
wtiteln(‘Число кратно 5’)
else
writeln(‘Число не кратно 5);
Readln;
end.
Похожие вопросы
1 год назад
2 года назад
8 лет назад
8 лет назад
9 лет назад