Question

2) Какое число будет выведено в результате работы следующей программы?var k, s: integer;beginк:= 1 ; s:=0;Repeat s = s+k;K:=k+2until k>8end.​

Answer 1

Ответ:

9

Объяснение:

Программа закончит работать, только когда будет выполнено условие k>8 В каждом циклее k увеличивается на 2. то есть 1+2, 3+2, 5+2, 7+2

Answer 2

Ваша программа содержит некоторые ошибки и не скомпилируется или не выполнится корректно в большинстве сред разработки Pascal. Вот исправленная версия программы:

pascalCopy code
var
  k, s: integer;
begin
  k := 1;
  s := 0;
  Repeat
    s := s + k;
    k := k + 2;
  until k > 8;
  writeln(s);
end.

Теперь программа будет работать правильно. Она начинает с переменных k и s, устанавливает k в 1 и s в 0, а затем в цикле Repeat...until увеличивает s на текущее значение k, затем увеличивает k на 2, и продолжает цикл, пока k не станет больше 8.

Результатом выполнения этой программы будет вывод суммы всех нечетных чисел от 1 до 8 включительно:

1 + 3 + 5 + 7 = 16

Таким образом, программа выведет число 16.