Определите, что будет напечатано в результате работы следующей программы 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: На каждой итерации цикла for значение переменной s уменьшается на 10. После выполнения цикла значение s будет равно 40. Поэтому на экран будет выведено число 40.
Программа 2: На каждой итерации цикла for переменная k увеличивается в два раза и прибавляется к себе. Таким образом, после выполнения цикла значение k будет равно 26. Поэтому на экран будет выведено число 26.
Программа 1:
На каждой итерации цикла for значение переменной s уменьшается на 10. После выполнения цикла значение s будет равно 40. Поэтому на экран будет выведено число 40.
Программа 2:
На каждой итерации цикла for переменная k увеличивается в два раза и прибавляется к себе. Таким образом, после выполнения цикла значение k будет равно 26. Поэтому на экран будет выведено число 26.