Var s, n: integer; Begin s := 2; For n := 2 to 5 do s := s + n*2; Writeln(s); End.
Answers & Comments
ilyavoznesensk
Программа выводит число 30, кароче, в начале программы для переменной s мы присваиваем число 2, затем крутим цикл 3 раза и с каждой прокруткой присваиваем переменной s выражение s+n*2 Например вот работа цикла: 1-й оборот: s = 2 + 2*2 =6 2-й оборот: s = 6 + 3*2 = 12 3-й : s = 12 + 4*2 = 20 4-й: s = 20 + 5*2 = 30 И в конце выводим результат s. Объяснил возможно коряво но попробуй понять.
5 votes Thanks 4
NoBrains
То есть "For n := 2 to 5 do" значит, что нужно крутить 3 раза? Почему именно 3 раза? а не 2 на пример?
ilyavoznesensk
Ошибся в пояснении, 4 раза, смотри, в этом условии сказано For n := 2 to 5 do от 2 до 5(включая саму 2 и 5), на первом обороте n = 2, а втором 3, на третьем 4, на пятом 5. Запомни, если например написать For n := 5 do 10 то циклов будет 5(т.е. включая 5 и 10).
ilyavoznesensk
Опять ошибся, сегодня не мой день, когда от 5 до 10, то циклов будет 6 т.к. включаем цикл с 5. 5..6..7..8..9..10
Answers & Comments
Например вот работа цикла:
1-й оборот: s = 2 + 2*2 =6
2-й оборот: s = 6 + 3*2 = 12
3-й : s = 12 + 4*2 = 20
4-й: s = 20 + 5*2 = 30
И в конце выводим результат s.
Объяснил возможно коряво но попробуй понять.