Дано число n. если n ≥ 1000, вывести на экран число тысяч если n < 100, вывести на экран число десятков если 100 ≤ n < 1000, вывести число единиц

187

440

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

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

qwerty882

Информатика

4,7(61 оценок)

1)n div 1000 2)n div 10 3n mod 10

yanastywa2000

Информатика

4,8(33 оценок)

Program gt; var i,k: integer; begin k: =0; for i: =1 to 1000 do if(i mod 2=1)then begin k: =k+1; write(i,' '); if(k=20)then exit; end; end. 2) program gt; var i,k: integer; begin k: =1; write(k,' '); for i: =1 to 14 do begin k: =k+3; write(k,' '); end; end.