Программа 10: program pr10; var s, i: integr; begin s: = 0; for i: = 20 to 40 do begin s: = s + i; i: = i+9; write (i, ‘-‘, s); end; end. а) сколько раз выполняется тело цикла в данной программе? б) что будет записано в переменную s после выполнения программы? в) что будет напечатано на экране? г) как изменится результат печати, если поменять местами две предпоследние строки программы? 2. сколько раз будут выполнены инструкции между begin – end? a) for i: =j to j+1 do begin . . end; b) k: = 0; for i: = 2 downto k do begin . . end; 3. чему будет равен х после выполнения инструкции? x: =0; for i: = -5 to 0 do n : =i* i; x : = x + n;

никита3227    3   29.07.2019 17:30    1