А) 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.
