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

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 "

leragromova20: спасибо! помоги еще с этим пожалуйста! Определите, что будет напечатано в результате работы следующего фрагмента программы:
var n, s: integer;
begin
n := 3;
s := 0;
while n <= 7 do begin
s := s + n;
n := n + 1
end;
write(s)
end.

ВорвараОо: строчка где while можно её разборчевей написать? я часть &lt не вдупляю немного

ВорвараОо: &lt *

ВорвараОо: емли в условии <= 7, то пооходов будет 5. значит s=15. если ' >= ' или ' = ' печатать не будет так как условие не выполняются

ВорвараОо: а не не не

ВорвараОо: 3 + 4 + 5 +6 +7

ВорвараОо: выведет 25

ВорвараОо: забыла что n после каждого прохода на 1 больше становится)

Предыдущий вопрос

Следующий вопрос

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

Предмет: Биология, автор: princesssadiana29

помогите пожалуйста срочно