Задание: вывести на экран все двузначные числа, кратные 13 (задачу решить: Цикл с параметром (цикл для) for)
Задание: вывести на экран все
двузначные числа, кратные 13 (задачу решить: Цикл с параметром (цикл для) for)
Гость
Ответ(ы) на вопрос:
Гостьuses crt;
var x:integer;
begin
for x:=10 to 99 do
if x mod 13=0 then writeln(x);
end.
Не нашли ответ?
Похожие вопросы