РЕБЯТ СРОЧНО ПОМОГИТЕ СДЕЛАТЬ ЛАБОРАТОРНУЮ ПО ИНФОРМАТИКЕ. ПОЖАЛУЙСТА. ОТДАЮ ВСЕ СВОИ ПНК
Var x, y: real; begin readln(x); if (x < 0) then y := sin(x) / cos(x) else if (x <= 1) then<br> y := sqr(e) else y := x + cos(x); writeln(y); end.
СПАСИБО ВАМ ОГРОМНОЕ. ПОЖАЛУЙСТА МОЖЕТЕ ЕЩЕ 1 ТАКОЕ же задание выполнить. Сейчас я выложу