Question

Исправить ошибки в программе:

program formuly ploshad dlina
const pi=3.14;
var a,b,r integer;S,C:real;
begin
a:=5;
b:=a+3;
writeln('Введите значение радиуса r=');
read(r);
S:=pirr;
C=2pi*r;
writeln('S=',S)
writeln('C',C);
end.​

Answer 1

Ответ:

free Pascal

program formuly_ploshad_dlina;

const pi=3.14;

var

a,b,r : integer;

S,C:real;

begin

 a:=5;

 b:=a+3;

 writeln('Введите значение радиуса r=');

 read(r);

 S:=pi*r*r;

 C:=2*pi*r;

 writeln('S=',S:2:2);

 writeln('C=',C:2:2);

end.