Предмет: Информатика, автор: vikaduvalova

Определите что будет напечатано в результате работы следующего фрагмента программы:


var n, s: integer;

begin

n := 2;

s := 35;

while n <= 25 do begin

s := s + 20;

n := n + 5

end;

write(s)

end.
НАПИШИТЕ, ПОЖАЛУЙСТА, С ПОДРОБНЫМ РЕШЕНИЕМ


iolandavalerypad353: в цикле Writeln(s, ' ', n) выполните программу и увидите, что и как

Ответы

Автор ответа: sergyzak2020bor
1

Відповідь:

135

Пояснення:

n := 2;

s := 35;

while n <= 25 do begin

s := s + 20;

n := n + 5

end;

write(s)

трасування програми

n=2, s =35;  <= 25 = true цикл повторюється

n=7, s =55;  <= 25 = true цикл повторюється

n=12, s =75;  <= 25 = true цикл повторюється

n=17, s =95;  <= 25 = true цикл повторюється

n=22, s =115;  <= 25 = true цикл повторюється

n=27, s =135;  <= 25 = false цикл не повторюється, перехід на кінець циклу

вивод 135

Похожие вопросы