Задание

Запишите на языке Паскаль фрагмент программы, соответствующий блок-схеме. При наборе программы учитывайте примечания.

Присвоим начальное значение переменной k.

Создадим цикл с постусловием

Обеспечим ввод (read) переменной x

Запишем команду ветвления (выполнить запись в одну строку)

Закончим цикл с постусловием

Обеспечим вывод (write) результата на экран. Выводим только значение переменной k

Определите значение переменной k после выполнения программы при следующих значениях x: 1, 5, -10, 3, -8, 6, 1, 2, -7, 4, 0.