Задание

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

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