вещ D, P, S, Pi=3.14
алг
нач
вывод 'Введите диаметр:', нс
вывод 'D= '
ввод D
P := Pi * D
S := Pi * D**2 / 4
вывод 'P= ', P, нс
вывод 'S= ', S, нс
кон
вещ D, P, S, Pi=3.14
алг
нач
вывод 'Введите диаметр:', нс
вывод 'D= '
ввод D
P := Pi * D
S := Pi * D**2 / 4
вывод 'P= ', P, нс
вывод 'S= ', S, нс
кон