Program n_1; Const pi=3.14; Var r, s, c: real; Begin r:=5.4; c:=2*pi*r; s:=pi*r*r; writeln ('c=',c:6:4); writeln ('s=',s:6:4) end. Вычислите длины окружности и площади круга Введите r-8.5 c=53.3800 s=226.8650
Подставь в формулу площади круга S=2pr