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

> Внимание!

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

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

 
Closed Topic Открыть новую тему 
> Люди, помогите с паскалем плиз....не решается, вопрос
сообщение
Сообщение #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.
 К началу страницы 
+ Ответить 
сообщение
Сообщение #2


просто человек
******

Группа: Пользователи
Сообщений: 3 641
Пол: Женский
Реальное имя: Юлия

Репутация: -  55  +


в синтаксисе...
компилятор же все нехорошие места выделяет.
после program нужен пробел, что значит 1/3.ln(a) - я не знаю (и он тоже)... **2 - тож загадочная конструкция.
WriteLn('Y1:='Y1); - запятую пропустил

а вообще - классный подход. прийти, не регистрируясь нарушить 3 правила форума (заголовок должен быть информативным, код - в тегах, тема - в подходящем разделе)... кинуть код, который непонятно что должен делать - и попросить "найти ошибку".


--------------------
Все содержимое данного сообщения (кроме цитат) является моим личным скромным мнением и на статус истины в высшей инстанции не претендует.
На вопросы по программированию, физике, математике и т.д. в аське и личке не отвечаю. Даже "один-единственный раз" в виде исключения!
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #3


Гость






Спасибо за помшщ, ну и извините за нарушение... give_rose.gif
 К началу страницы 
+ Ответить 
сообщение
Сообщение #4


Perl. Just code it!
******

Группа: Пользователи
Сообщений: 4 100
Пол: Мужской
Реальное имя: Андрей

Репутация: -  44  +


Достали просто уже ... Гость Правила форума для тебя не писаны ? Закрыто.


--------------------
perl -e 'print for (map{chr(hex)}("4861707079204E6577205965617221"=~/(.{2})/g)), "\n";'
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 

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

 





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