Question

Задание на языке Паскаль.

Answer 1

Program n_1;
const pi=3.14;
var r, c, s: real;
begin
r:=5.4;
c :=2*pi*r;
s:=pi*r*r;
writeln ('c =', c :6:4);
writeln ('s=', s:6:4)
end.