Question

Определите, что будет напечатано в результате работы следующей программы. Var s, k: integer; Begin s:=110; for k := 5 to 12 do s :=s - 5write(s); End.

Answer 1

Ответ:70
s:=110; 
for k:= 5 to 12 do 
s:=s-5;
Это цикл который будет повторяться 8 раз.Потому что считаем от 5 до 12
110-5-5-5-5-5-5-5-5=70