Определите, что будет напечатано в результате работы следующей программы. Решение пожалуйста. 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