Задание 7 Параграф 4.5 ГДЗ Босова 8 класс 2023 (Информатика)

var
x, s: integer;
begin
s := 0;
repeat
write(‘х > > ‘);
readln(x);
s := s + x
until x = 0;
writeln(‘s = ‘, s)
end.
Окно вывода
х > > 3
х > > 4
х > > 23
х > > 5
х > > 0
s = 35

Сумму удобно накапливать в переменной $$s$$. Сначала ей присваиваем значение $$0$$, затем в цикле repeat вводим очередное число $$x$$ и прибавляем его к сумме. Цикл заканчивается, когда введён ноль. Ноль тоже попадает в сумму, но на результат это не влияет.

var
  x, s: integer;
begin
  s := 0;
  repeat
    write(‘x>>’);
    readln(x);
    s := s + x
  until x = 0;
  writeln(‘s = ‘, s)
end.

При вводе чисел $$3, 4, 23, 5, 0$$ получаем:

$$s = 3 + 4 + 23 + 5 + 0 = 35$$

Ответ

Программа на Паскале:

var
  x, s: integer;
begin
  s := 0;
  repeat
    write(‘x>>’);
    readln(x);
    s := s + x
  until x = 0;
  writeln(‘s = ‘, s)
end.

При указанном вводе: $$s = 35$$.