Есть ответ 👍

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

296
472
Посмотреть ответы 2

Ответы на вопрос:


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

program v1;

var n:integer;

begin

repeat

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

 readln(n);

until n mod 5 = 0;

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

end.


Вводить числа с клавиатуры пока не будет введено число кратное 5
danpro3
4,8(89 оценок)

Обнаружение, удаление или обезвреживанте вирусов.

Популярно: Информатика