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.

Answer 2

Конечно, я помогу вам с этими фрагментами программы:

1. Фрагмент программы:

pascalCopy code
var k, s: integer;
begin
  s := 0;
  k := 1;
  repeat
    s := s + k;
    k := k + 1;
  until k > 11;
  write(s);
end.

Давайте посчитаем значение переменных на каждой итерации цикла:

• Итерация 1: s = 1, k = 2
• Итерация 2: s = 3, k = 3
• Итерация 3: s = 6, k = 4
• Итерация 4: s = 10, k = 5
• Итерация 5: s = 15, k = 6
• Итерация 6: s = 21, k = 7
• Итерация 7: s = 28, k = 8
• Итерация 8: s = 36, k = 9
• Итерация 9: s = 45, k = 10
• Итерация 10: s = 55, k = 11

Цикл завершится, так как k > 11 станет истиной. Значит, результат работы программы будет 55.

2. Фрагмент программы:

pascalCopy code
var k, s: integer;
begin
  s := 0;
  k := 0;
  while k < 30 do
  begin
    k := k + 3;
    s := s + k;
  end;
  write(s);
end.

Давайте посчитаем значение переменных на каждой итерации цикла:

• Итерация 1: s = 3, k = 3
• Итерация 2: s = 9, k = 6
• Итерация 3: s = 18, k = 9
• Итерация 4: s = 30, k = 12
• Итерация 5: s = 45, k = 15
• Итерация 6: s = 63, k = 18
• Итерация 7: s = 84, k = 21
• Итерация 8: s = 108, k = 24
• Итерация 9: s = 135, k = 27
• Итерация 10: s = 165, k = 30

Цикл завершится, так как k < 30 станет ложью. Значит, результат работы программы будет 165.

Пожалуйста, обратите внимание, что эти результаты основаны на вашем предоставленном коде и предполагают, что используется синтаксис языка программирования Pascal.