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

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

Фрагмент программы на языке Паскаль:

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

Программа последовательно считывает числа, увеличивает $$k$$ на 1 для каждого числа, большего 1, и заканчивает работу при $$x = 0$$.

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