Сделайте очень нужно ​

AC+CE+EF=5+2+7=14 км

Должно быть так

program z1;

var x,y: real;

begin

writeln('vvedite x i y');

readln(x,y);

if y=5*x*x-7*x+2 then

writeln('yes');

else

writeln('no');

end;

program pyat;

var a, b, c, d ,f, p : integer;

begin

writeln ('vvedite dlini storon pyatiugolnika');

readln (a);

readln (b);

readln (c);

readln (d);

readln (f);

p: = a+b+c+d+f;

writeln ('perimetr raven', p);

readln;

end.