Определите, что будет напечатано в результате работы следующей программы. Решение пожалуйста. Var s, k: integer; Begin s := 50; for k := 1 to 9 do s := s - 3; write (s); End.
Определите, что будет напечатано в результате работы следующей программы. Решение пожалуйста.
Var s, k: integer;
Begin
s := 50;
for k := 1 to 9 do
s := s - 3;
write (s);
End.
Гость
Ответ(ы) на вопрос:
ГостьПрограмма 9 раз вычитает из s число 3.
Поэтому s=50-9*3=23
Если все расписывать по шагам:
k=1;
s=50-3=47
k=2
s=47-3=44
k=3
s=44-3=41
k=4
s=41-3=38
k=5
s=38-3=35
k=6
s=35-3=32
k=7
s=32-3=29
k=8
s=29-3=26
k=9
s=26-3=23
Ответ: 23
Не нашли ответ?
Похожие вопросы