Вводить числа с клавиатуры пока не будет введено число кратное 5

ALBERTALBERT2004 ALBERTALBERT2004    3   10.12.2020 15:52    2

Ответы
kantuz kantuz  09.01.2021 15:53

Если в паскале

program v1;

var n:integer;

begin

repeat

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

 readln(n);

until n mod 5 = 0;

writeln('Число кратное 5');

end.


Вводить числа с клавиатуры пока не будет введено число кратное 5
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика