Мы проходили тему программирование и я не поняла тему ну мы там в столбик писали program uar begin write readln end. нужна такоё 1) f=x^3+2/y 2)f=(a+b)^2/a-1

1)
var x,y,F:real;
begin
 write('Введите x ');
readln(x);
write('Введите y ');
readln(y);
if (y>0) then F:=x*x*x+2/y
writeln('F=',F)
end.
Как-то так наверн :)

2)
var a,b,F:real;
begin
 write('Введите a ');
readln(a); 
write('Введите b '); 
readln(b);
if(a>1) then sqr(a+b)/a-1
writeln('F=',F)
end.