Программа 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;
а) 0 раз потому что будет выдана ошибка
"Нельзя изменять значение переменной цикла внутри этого цикла"
б) Соответственно останется 0
в) ничего
г) никак, ошибка будет повторяться
2 а) 2 раза
b)3 раза
3) 0
a) 3
b) 90
c) 29-20-39-50-49-90
d) 20-20-30-50-40-90
#2
a) 2
b) 3
#3
0