решите информатику плиииизизииззиииззиииииииз 1.Определите, что будет напечатано в результате работы следующего фрагмента программы: var k, s: integer; begin        s:=0;        k:=0;  while s < 80 do begin             s:=s+2*k;             k:=k+4;        end;       write(s); end. 2.var s, n: integer; begin     s := 300;     n := 100;   while s - n >= 100 do     begin         s := s + 20;         n := n + 30     end; writeln(s) end. 3.var s, n: integer; begin     s := 300;     n := 100; while s div n >= 2 do begin         s := s + 5;         n := n + 5     end;     writeln(s) end. 4.Определите, что будет напечатано в результате работы следующего фрагмента программы: var k, s: integer; begin        s:=0;        k:=0;       while k < 12 do begin             s:=s+2*k;             k:=k+3;        end;       write(s); end.

Вопрос школьника по предмету Информатика

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

2.var s, n: integer;
begin
    s := 300;
    n := 100;
  while s — n >= 100 do
    begin
        s := s + 20;
        n := n + 30
    end;
writeln(s)
end.

3.var s, n: integer;
begin
    s := 300;
    n := 100;
while s div n >= 2 do begin
        s := s + 5;
        n := n + 5
    end;
    writeln(s)
end.

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