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

Question

Определите что будет напечатано в результате работы следующего фрагмента программы: var n, s: integer; begin n := 2; s := 35; while n <= 25 do begin s := s + 20; n := n + 5 end; write(s) end. НАПИШИТЕ, ПОЖАЛУЙСТА, С ПОДРОБНЫМ РЕШЕНИЕМ

Comments

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

Answer 1

Відповідь:

135

Пояснення:

n := 2;

s := 35;

while n

s := s + 20;

n := n + 5

end;

write(s)

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

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

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

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

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

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

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

вивод 135