Помогите пожалуйста мы проходили тему Программирование и я не поняла тему ну мы там в столбик писали
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.
Оцени ответ
