Определите, что будет напечатано в результате работы следующей программы

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

элементарно ватсон