Question

ЗАДАНИЕ НА ПАСКАЛЕ: написать программу и вывести на экран все целые трехзначные числа, кратные 119

Answer 1

Ответ:

var

 i, n, k: integer;

 

begin

 write(' k = ');

 readln(k);

 write(' N = ');

 readln(N);  

 writeln;

 for i := k to n do

   if i mod 3 = 0 then write(' ', i)

end.

Объяснение:

Answer 2

В mod пиши число с интервалом.