Определите, что будет напечатано в результате работы следующей программы: Var m, n : integer; begin m := 50; for n := 1 to 7 do m := m – 7; write(m); end.
Определите, что будет напечатано в результате работы следующей программы:
Var m, n : integer;
begin
m := 50;
for n := 1 to 7 do
m := m – 7;
write(m);
end.
Ответ(ы) на вопрос:
7 раз будет повторяться выражение m-7 то есть
50-7=43
43-7=36
36-7=29
29-7=22
22-7=15
15-7=8
8-7=1
На экран выведет 1
Не нашли ответ?
Похожие вопросы