22 Янв 20150 КомментариевPascal Решение задачи Begin7 Условие задачи:Найти длину окружности L и площадь круга S заданного радиуса R: L = 2·π·R, S = π·R2. В качестве значения π использовать 3.14. uses PT4; const pi = 3.14; var r, l, s: real; begin Task('Begin7'); read(r); l := 2 * pi * r; s := pi * sqr(r); write(l, s); end. Поделиться:
