Упр.2.195 ГДЗ Сборник упражнений Босова 7-9 класс (Информатика)

1. Запишите на языке Паскаль фрагмент программы, соответствующий блок-схеме. Определите значение переменной $$k$$ после его выполнения при следующих значениях переменной $$x$$: 1, 5, −10, 3, −8, 6, 1, 2, −7, 4, 0. Составьте таблицу значений переменных.

По блок-схеме переменная $$k$$ сначала получает значение $$0$$. Затем последовательно вводятся значения $$x$$. Если $$x > 1$$, то $$k$$ увеличивается на $$1$$. Работа цикла заканчивается при $$x = 0$$.

var
k, x: integer;
begin
  k := 0;
  repeat
    read(x);
    if x > 1 then k := k + 1
  until x = 0;
  writeln(k)
end.

Проследим выполнение программы для заданной последовательности значений $$x$$:

После ввода нуля цикл завершается, и на экран выводится значение $$k = 5$$.

Ответ: $$5$$.