Предмет: Информатика,
автор: 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.
Ответы
Автор ответа:
0
k = 10240
напечатано будет " 10240 "
напечатано будет " 10240 "
Похожие вопросы
Предмет: Биология,
автор: princesssadiana29
Предмет: Русский язык,
автор: Oletta0gecko
Предмет: Українська мова,
автор: Аноним
Предмет: Математика,
автор: serkil0000
Предмет: География,
автор: tsickunova2
var n, s: integer;
begin
n := 3;
s := 0;
while n <= 7 do begin
s := s + n;
n := n + 1
end;
write(s)
end.