Pascal. Ребят, помогите написать программу в паскале

[Дианка]

Вобщем помогите написать программу в паскале. В школе таких делов не проходили, поступила в университет и тут на тебе...на 2ое занятие лабораторная работа...
ссылка Вот самое задание 4 примера.
В начале знаю, надо писать:
Program Lab1;
uses crt;
var x,y,z,r1,r2,r3:real;
begin
clrscr
writeln('Enter x,y');
readln(x,y);
r1:= ..........а вот дальше не знаю. С самим переводом на язык паскаль проблемы=(
Знающие люди, помогите пожалуйста.

[Данила]

а зачем вам z,r1,r2,r3  и считывать с клавиатуры х и у,если они даны?

var result:real;
begin
x:=3;
y:=3;
result:= ((abs(x)+1)/6) + ((exp(-3*x)-0.4)/(5+7*y);
end.

[Дианка]

извините, может я чего-то не поняла...
вобщем мы в классе делали как- сначала выражение переводили на язык паскаль ( с этим главная проблема ). Потом писали уже преобразованное выражение в "r1:=" потом жали Ctrl F9 и там должно предлагаться ввести х и у. Я сколько не делала, ни одно выражение из 4х не получалось. Как я поняла, я не правильно преобразовала формулу в язык паскаль...

[Данила]

var result:real;
begin
readln(x,y);
result:= ((abs(x)+1)/6) + ((exp(-3*x)-0.4)/(5+7*y);
end.

ну сделайте считывание клавиатуры. найдите любую книгу по паскалю,там все встроеные функции есть

[Дианка]

эмм...извиняюсь за наглость, не могли бы вы перевести данные 4 выражения на язык паскаль...блин у меня не выходит=((
вот как вы это сделали
result:= ((abs(x)+1)/6) + ((exp(-3*x)-0.4)/(5+7*y)

[Данила]

что именно непонятно?

abs - модуль
exp(х) - e в степени х

[Дианка]

ну а вот другие как сделать? там всякие котангенсы и косинусы в квадрате....уааааа(((( ппц....распишите мне их плиииз)

[Asix]

ну а вот другие как сделать? там всякие котангенсы и косинусы в квадрате....уааааа(((( ппц....распишите мне их плиииз)

Этот материал надо посмотреть в таблице функций. Она доступна в интернете, надо только слегка поискать через поисковики!