Задание: вывести на экран все

двузначные числа, кратные 13 (задачу решить: Цикл с параметром (цикл для) for)

Question

Алла

5 февраля, 11:01

+4

Ответы (1)

Знаете ответ на вопрос?

Витюшка · Answer 1

Uses crt;

var x:integer;

begin

for x:=10 to 99 do

if x mod 13=0 then writeln (x) ;

end.

Задание: вывести на экран вседвузначные числа, кратные 13 (задачу решить: Цикл с параметром (цикл для) for)