IPB
ЛогинПароль:

> Внимание!

1. Пользуйтесь тегами кода. - [code] ... [/code]
2. Точно указывайте язык, название и версию компилятора (интерпретатора).
3. Название темы должно быть информативным.
В описании темы указываем язык!!!

Наладить общение поможет, если вы подпишитесь по почте на новые темы в этом форуме.

> Люди, помогите с паскалем плиз....не решается, вопрос
сообщение
Сообщение #1


Гость






Народ, помогите пожалуйста найти ошибку, срочно . Мне эту хрень в субботу здавать. НЕ врубаюсь где тут ошибка... mega_chok.gif mega_chok.gif


Program_Laba1;
Uses Crt;
Var a,b,x,Y1,Yd,Y2,Z1,Z2: Real;
begin
ClrScr;
a:=5.3;
b:=2.1;
x:=0.75;
Y1:=(sqr(a)-sqr(b))*(exp(1/3.ln(a))-exp(1/3.ln(b)))/Yd;
Yd:=(exp(4/3.ln(a))+b*exp(1/3.ln(a))-a*exp(1/3.ln(b))-exp(4/3.ln(b)));
Y2:=a-b;
Z1:=Cos(4*x)-Sin(4*x)*Ctg(2*x);
Z2:=Cos(2*x)-2*Cos(x)**2;
WriteLn('Y1:='Y1);
ReadKey;
end.
 К началу страницы 
+ Ответить 

Сообщений в этой теме


Closed Topic Открыть новую тему 
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 





- Текстовая версия 28.01.2022 12:14
500Gb HDD, 6Gb RAM, 2 Cores, 7 EUR в месяц — такие хостинги правда бывают
Связь с администрацией: bu_gen в домене octagram.name