Определите, что будет напечатано в результате работы следующей программы: Var m, n : integer; begin m := 50; for n := 1 to 7 do m := m – 7; write(m); end.

15 Янв 2019 в 10:10
791 +1
0
Ответы
1

1

У вас в цикле от 1 до 7 вычитается 7 из исходных 50, получается, что мы вычитаем 7 7 раз, 50 - 7*7 - 50-49 = 1

22 Янв 2019 в 18:39
Не можешь разобраться в этой теме?
Обратись за помощью к экспертам
Гарантированные бесплатные доработки в течение 1 года
Быстрое выполнение от 2 часов
Проверка работы на плагиат
Поможем написать учебную работу
Прямой эфир