Определите, что будет напечатано в результате работы следующей программы. Var s, k: integer; Begin s:=50; for k : = 1 to 9 do s : = s - 3 write (s) ; End.

Question

Федан

4 июня, 00:40

+4

Ответы (2)

Знаете ответ на вопрос?

Андрюша · Answer 1

s = 50

k=1 s=50-3=47

k=2 s=44

k=3 s=41

k=4 s=38

k=5 s=35

k=6 s=32

k=7 s=29

k=9 s=26

Ответ: 26

Игоша · Answer 2

ответ получается 23

ответ 100%, проверял в турбо паскаль

1=47

2=44

3=41

4=38

5=35

6=32

7=29

8=26

9=23