Question

Помогите с паскалем!
1.program zadacha;
2.const pi=3.14;
3.var r,C,s: real;
4.Begin
5.r:=5.4;
6.C:=2*pi*r;
7.S:=pi*r*r;
8.read(r);
9.write('c=',c,'s=',s);
10.end.
Что не так?

Answer 1

Program zadacha;

const pi=3.14;

var r,C,s: real;

Begin
r:=5.4;
C:=2*pi*r;
S:=pi*r*r;
writeln('c=',c);
writeln('s=',s);
end.