Найти все числа, которые делятся на n среди а) всех двузначных чисел; б) всех трёхзначных чисел

106

248

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

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

Танек47896

Информатика

4,6(84 оценок)

А) program a; uses crt; var i,n: integer; begin writeln ('введите n'); read (n); for i: =10 to 99 do begin if i mod n=0 then write (i,' '); end; end.б) program b; uses crt; var i,n: integer; begin writeln ('введите n'); read (n); for i: =100 to 999 do begin if i mod n=0 then write (i,' '); end; end.