Var s,k: integer; Begin s := 0; for k := 3 to 8 do s := s + 6; writeln(s); End. Помогите пожалуйста, объясните поэтапно как это решить?

Ответы:
Tema Lyashchuk
29-02-2012 18:02

Var s,k: integer;Begins := 0; // переменной s присваиваем начальное значение 0for k := 3 to 8 do // цикл будет исполнен 6 раз (для k= 3, 4, 5, 6, 7, 8)s := s + 6; // в теле цикла переменная S (изначально равная 0) каждый раз будет увеличиваться на 6. Т.е. в итоге будет 0+6+6+6+6+6+6=36writeln(s); // выводим переменную s на экран - будет напечатано 36End. ---------------------------------В результате выполнения программы будет напечатано число 36

Также наши пользователи интересуются:

Картинка с текстом вопроса от пользователя Макс Макитра

⭐⭐⭐⭐⭐ Лучший ответ на вопрос «Var s,k: integer; Begin s := 0; for k := 3 to 8 do s := s + 6; writeln(s); End. Помогите пожалуйста, объясните поэтапно как это решить?» от пользователя Макс Макитра в разделе Экономика. Задавайте вопросы и делитесь своими знаниями.

Открой этот вопрос на телефоне - включи камеру и наведи на QR-код!