2. Дано число х. Напечатать в порядке возрастания числа: sin х, cos х, ln х. Если при каком-либо значении х некоторые из выражений не имеют смысла, вывести сообщение об этом и сравнивать значения только тех выражений, которые и...
2. Дано число х. Напечатать в порядке возрастания числа: sin х, cos х, ln х. Если при каком-либо значении х некоторые из выражений не имеют смысла, вывести сообщение об этом и сравнивать значения только тех выражений, которые имеют смысл.Паскаль пожалуйста).
Гость
Ответ(ы) на вопрос:
ГостьVar
x,a,b,c,max,min,mid:real;
begin
readln(x);
a:=sin(x);
b:=cos(x);
if a>0 then
begin
c:=ln(x);
if (a>b) and (a>c) then max:=a else
if (b>a) and (b>c) then max:=b else max:=c;
if (amin) and (amin) and (bb then writeln(b,' ',a) else writeln(a,' ',b);
end.
Не нашли ответ?
Похожие вопросы