Помогите пожалуйста мы проходили тему Программирование и я не поняла тему ну мы там в столбик писали program uar begin write readln end. помогите нужна такоё домашние задание 1) F=X^3+2/Y 2)F=(A+B)^2/A-1
Помогите пожалуйста мы проходили тему Программирование и я не поняла тему ну мы там в столбик писали
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.
Не нашли ответ?
Похожие вопросы