Вводить числа с клавиатуры пока не будет введено число кратное 5
restIess:
На каком языке?
Ответы
Ответ дал:
1
Если в паскале
program v1;
var n:integer;
begin
repeat
writeln('Ведите число:');
readln(n);
until n mod 5 = 0;
writeln('Число кратное 5');
end.
Приложения:
Вас заинтересует
1 год назад
1 год назад
1 год назад
6 лет назад