ДАЮ Определите, что будет напечатано в результате работы следующего
фрагмента программы:
var k, s: integer;
begin
s:=5;
k:=0;
while k < 15 do begin
k:=k+2;
s:=s+k;
end;
write(s);
end.

№2. Определите, что будет напечатано в результате выполнения программы
(записанной ниже на разных языках программирования):
var n, s: integer;
begin
n := 30;
s := 1;
while s < 500 do
begin
s := s * 2;
n := n + 10
end;
write(n);
end.

innahot418    1   09.12.2020 22:23    0