Определите, что будет напечатано в результате работы следующего фрагмента программы: var n, s:
integer; begin n := 2; s := 35; while n <= 25 do begin s := s + 20; n := n + 5 end; write(s) end.Ответы на вопрос
Ответ: 135
Объяснение:
n = 2
s = 35
пока n <= 25 делать:
s = 35 + 20 = 55
n = 2 + 5 = 7
пока n <= 25 делать:
s = 55 + 20 = 75
n = 7 + 5 = 12
пока n <= 25 делать:
s = 75 + 20 = 95
n = 12 + 5 = 17
пока n <=25 делать:
s = 95 + 20 = 115
n = 17 + 5 = 22
пока n <= 25 делать:
s = 115 + 20 = 135
n = 22 + 5 = 27
пока n <= 25 становится ложью и осуществляется выход из программы.
s = 135
Давайте разберемся с этим фрагментом программы:
var n, s: integer;- Объявление двух целочисленных переменныхnиs.begin- Начало блока кода.n := 2;- Присвоение переменнойnзначения 2.s := 35;- Присвоение переменнойsзначения 35.while n <= 25 do- Начало циклаwhile. Цикл будет выполняться, пока значениеnменьше или равно 25.begin- Начало блока кода цикла.s := s + 20;- Увеличение значения переменнойsна 20.n := n + 5- Увеличение значения переменнойnна 5.end;- Конец блока кода цикла.write(s)- Вывод значения переменнойs.end.- Конец блока кода программы.
Теперь давайте пошагово пройдемся по циклу:
- Начальные значения:
n = 2,s = 35. - Итерация 1:
nувеличивается на 5 и становится равным 7,sувеличивается на 20 и становится равным 55. - Итерация 2:
nувеличивается на 5 и становится равным 12,sувеличивается на 20 и становится равным 75. - Итерация 3:
nувеличивается на 5 и становится равным 17,sувеличивается на 20 и становится равным 95. - Итерация 4:
nувеличивается на 5 и становится равным 22,sувеличивается на 20 и становится равным 115. - Итерация 5:
nувеличивается на 5 и становится равным 27. Условиеn <= 25больше не выполняется, так как 27 больше 25.
После выполнения цикла, переменная s остается равной 115. Следовательно, результат работы программы будет:
115
Похожие вопросы
Топ вопросов за вчера в категории Информатика
Последние заданные вопросы в категории Информатика
-
Математика
-
Литература
-
Алгебра
-
Русский язык
-
Геометрия
-
Английский язык
-
Химия
-
Физика
-
Биология
-
Другие предметы
-
История
-
Обществознание
-
Окружающий мир
-
География
-
Українська мова
-
Информатика
-
Українська література
-
Қазақ тiлi
-
Экономика
-
Музыка
-
Право
-
Беларуская мова
-
Французский язык
-
Немецкий язык
-
МХК
-
ОБЖ
-
Психология
-
Физкультура и спорт
-
Астрономия
-
Кыргыз тили
-
Оʻzbek tili
