1.некто составил программу ,в который определяеться количество чисел в интервале от 200 до 500 которые деляться на 14 .он допустил ошибку. исправте их и запишите верный вариант программы program программа_2; var n,z: integer; begin z=: 0 ; n=: 100 ; for n: =100 to 1000 do begin if (n div 14 =0) then writeln(n); z: =z+1; end; writeln(z); end. 2.определите ,что будет напечатано в результате выполнения следующего алгоритма записанного в паскале.укажите ,сколько раз выполниться цикл тела . var z,n,i: integer; begin z: =30; for n: =8 to 15 do begin if n > 10 then z: =z-2*n else z: =z+n; end; writeln(z) end.

ярик467    2   17.09.2019 07:20    1