Определите значение переменной s после выполнения программы: var s,i:integer; begin s:=0; i:=10; while i>5 do begin i:=i-1; s:=s+i;end; writeln(s); end.
Нет на компьютере Паскаля)
Как?
Ручной расчет по программе: s = 0; i = 10 i>5 ⇒ 10>5 ⇒ true; i = i-1 = 10-1 = 9; s = s+i = 0+9 = 9 i>5 ⇒ 9>5 ⇒ true; i = i-1 = 9-1 = 8; s = s+i = 9+8 = 17 i>5 ⇒ 8>5 ⇒ true; i = i-1 = 8-1 = 7; s = s+i = 17+7 = 24 i>5 ⇒ 7>5 ⇒ true; i = i-1 = 7-1 = 6; s = s+i = 24+6 = 30 i>5 ⇒ 6>5 ⇒ true; i = i-1 = 6-1 = 5; s = s+i = 30+5 = 35 i>5 ⇒ 5>5 ⇒ false Ответ: s = 35
1.S=10, i=9 2.S=19,i=8 3.S=27,i=7 4.S=34.i=6 В итоге переменная s равна 34, так как действие программы заканчивается, когда достигается значение i=5.