Question

ПОЖАЛУЙСТА СРОЧНО!!!
1. Определите, что будет напечатано в результате работы следующего
фрагмента программы:
var k, s: integer;
begin
s:=0; k:=1;
repeat
s:=s+k;
k:=k+1
until k > 11;
write(s);
end.
2. Определите, что будет напечатано в результате работы следующего
фрагмента программы:
var k, s: integer;
begin
s:=0;
k:=0;
while k < 30 do begin
k:=k+3;
s:=s+k;
end;
write(s);
end.

Answer 1

Ответ:

DIM K, S AS INTEGER

S = 0

K = 1

WHILE S < 66

   K = K + 3

   S = S + K

WEND

PRINT K

_________________________

s = 0

k = 1

while s < 66:

   k += 3

   s += k

print(k)

_______________________

var k, s: integer;

begin

      s:=0;

      k:=1;

     while s < 66 do begin

            k:=k+3;

           s:=s+k;

      end;

     write(k);

end.