Определите, что будет напечатано в результате работы следующей программы Var s,k: integer; Begin s:=100 for k:= 2 to 7 do s:=s -10 write (s) End. как это нужно делать?
Данная программа содержит синтаксическую ошибку в строке for k:= 2 to 7 do, так как отсутствует точка с запятой после выражения s:=100. Правильный код будет следующим:
Var s, k: integer; Begin s:= 100; for k:= 2 to 7 do s:= s - 10; writeln(s); End.
Результат выполнения программы будет: s = 100, после каждого прохода цикла значения s будут уменьшаться на 10, соответственно результат будет: 90 80 70 60 50 40
Данная программа содержит синтаксическую ошибку в строке for k:= 2 to 7 do, так как отсутствует точка с запятой после выражения s:=100.
Правильный код будет следующим:
Var s, k: integer;
Begin
s:= 100;
for k:= 2 to 7 do
s:= s - 10;
writeln(s);
End.
Результат выполнения программы будет:
s = 100, после каждого прохода цикла значения s будут уменьшаться на 10, соответственно результат будет:
90
80
70
60
50
40
То есть на экран будет выведено 40.