1. Определите, что будет напечатано в результате работы следующего фрагмента программы: var k, s: integer; begin s:=0; k:=0; while s < 1024 do begin s:=s+10; k:=k+1; end; write(k); end.
K = 10240 напечатано будет " 10240 "
спасибо! помоги еще с этим пожалуйста! Определите, что будет напечатано в результате работы следующего фрагмента программы: var n, s: integer; begin n := 3; s := 0; while n <= 7 do begin<br> s := s + n; n := n + 1 end; write(s) end.
строчка где while можно её разборчевей написать? я часть < не вдупляю немного
< *
емли в условии <= 7, то пооходов будет 5. значит s=15. если ' >= ' или ' = ' печатать не будет так как условие не выполняются
а не не не
3 + 4 + 5 +6 +7
выведет 25
забыла что n после каждого прохода на 1 больше становится)