Пожалуйста, прошу помогите, отдаю все баллы что у меня есть. Нужно сделать программу которая может вичислять величини. (на турбо паскаль). То что отмечено красним 10 вариант и его нужно сделать.
Answers & Comments
Baseeke
Program qwedsazxc; uses crt; var z,x,y:real; begin Write('Enter X = ');readln(x); if (x<2) then y:=(abs(x-sqr(x)+12)) else y:=(2*(sqrt(exp(ln(x)*3))-5)); z:=y-5; Writeln('Amswer = ',z); end. Вот это может конкретно помочь
Answers & Comments
uses crt;
var z,x,y:real;
begin
Write('Enter X = ');readln(x);
if (x<2) then y:=(abs(x-sqr(x)+12))
else y:=(2*(sqrt(exp(ln(x)*3))-5));
z:=y-5;
Writeln('Amswer = ',z);
end.
Вот это может конкретно помочь