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