Предмет: Информатика, автор: MrsHollywood1

Помогите пожалуйста !
Надо до завтра !

Приложения:

Ответы

Автор ответа: WhitePineapple
0
var
i:integer;
y,x:real;
begin
writeln('Введите аргумент X');
readln(x);
if (x>=0) and (x<=2) then
   begin
   y:=ln(30)+exp(2*x);
   writeln('1 случай:');
   end
else
    if (x<0) then
       begin
       y:=cos(x-5);
       writeln('2 случай:');
       end
    else
        begin
        y:=2*pi*x;
        writeln('3 случай:');
        end;
writeln('Значение функции Y = ',y);
end.

Автор ответа: MrsHollywood1
0
Ты чудо ! Спасибо !
Похожие вопросы
Предмет: Русский язык, автор: hhbhkjffhhj
Предмет: Алгебра, автор: artem13542artem