Определите, что будет напечатано в результате работы следующей программы var s,k: integer; begin s: =100 for k: = 2 to 7 do s: =s -10 write (s) end. определите, что будет написано в результате работу следующей программы: var k, i: integer; begin k: =2; for i: = 1 to 4 do k: = 2*i+k; writeln(k); end.

1) s будет равно 40.
for k:= 2 to 7 do - цикл будет выполнен 6 раз (2/3/4/5/6/7). Каждый раз переменная s будет уменьшаться на 10:
100-10=90 (1 цикл)
90-10=80 (2-й)
80-10=70 (3-й)
70-10=60 (4-й)
60-10=50 (5-й)
50-10=40 (6-й цикл, последний)
S=40

2) k будет равно 22.
For i:= 1 to 4 do - цикл будет выполнен 4 раза (1/2/3/4). Каждый раз переменная k будет присваивать значение 2*i+k:
2*1+2=4 (1-й цикл: 1 - это i, 2 - первоначальное значение k)
2*2+4=8 (2-й цикл: 2 - это очередная i, 4 - предыдущее значение k)
2*3+8=14 (3-й цикл)
2*4+14=22 (4-й цикл, последний)
k=22

1) 40
2) 22
элементарно ватсон