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

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

Question

Липа

13 апреля, 10:51

+1

Ответы (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)