Определите, что будет напечатано в результате работы следующей программы
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=402) 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) 402) 22элементарно ватсон