Технический форум
Вернуться   Технический форум > Программы и программирование, операционные системы > Форум программистов > Delphi, Kylix and Pascal
Новые сообщения

Ответ
 
Опции темы Опции просмотра
Старый 01.02.2012, 15:06   #1 (permalink)
Member
 
Регистрация: 01.02.2012
Сообщений: 66
Репутация: 10
По умолчанию Помогите, пожалуйста, записать математические выражения в Паскале

1. y=sqrt(x+3)+sqrt(x-1) тоесть под корнем эти два выражения..
2. y=sqrt(x-a)+1/x+c
3. y=ln(arctg(ln(x)/x^2))
Гульназ.М. вне форума   Ответить с цитированием
Старый 01.02.2012, 15:29   #2 (permalink)
Специалист
 
Аватар для Vladimir_S
 
Регистрация: 27.08.2008
Адрес: Санкт-Петербург
Сообщений: 14,426
Репутация: 6876
По умолчанию

Цитата:
Сообщение от Гульназ.М. Посмотреть сообщение
1. y=sqrt(x+3)+sqrt(x-1) тоесть под корнем эти два выражения..
2. y=sqrt(x-a)+1/x+c
3. y=ln(arctg(ln(x)/x^2))
Так почти записаны. Осталось только заменить знаки равенств ("=") знаками присваивания (":="), "x^2" выражением sqr(x), "arctg" на "arctan" и в конце каждой строки поставить разделитель ";". Например, последнее выражение запишется так:
y:=ln(arctan(ln(x)/sqr(x)));
Кроме того, на будущее:
1. Не дублируйте сообщения и темы - у нас это наказуемо.
2. Не цепляйтесь к чужим темам - создавайте свои. Сейчас я это сделал за Вас.
__________________
With Mozilla Firefox - straight to communism!
Vladimir_S на форуме   Ответить с цитированием
Старый 03.02.2012, 12:56   #3 (permalink)
Member
 
Регистрация: 01.02.2012
Сообщений: 66
Репутация: 10
По умолчанию

спасибо большое, и извиняюсь..я просто впервые в форуме. а вы не сможете мне программу для каждого из этих выражений составить? у меня получилось только не хватает проверка условий и из за этого запуталась полностью
Гульназ.М. вне форума   Ответить с цитированием
Старый 03.02.2012, 13:01   #4 (permalink)
Member
 
Регистрация: 01.02.2012
Сообщений: 66
Репутация: 10
По умолчанию

y:=exp(1/4*ln(x+3))+exp(1/4*ln(x-1));
y:= sqrt(x-a)+(1/(x+c));
y:= ln(arctan(ln(x/sqr(x))));

вот они.
Гульназ.М. вне форума   Ответить с цитированием
Старый 03.02.2012, 14:25   #5 (permalink)
Специалист
 
Аватар для Vladimir_S
 
Регистрация: 27.08.2008
Адрес: Санкт-Петербург
Сообщений: 14,426
Репутация: 6876
По умолчанию

Цитата:
Сообщение от Гульназ.М. Посмотреть сообщение
y:=exp(1/4*ln(x+3))+exp(1/4*ln(x-1));
О, Боже - это-то зачем?!! Во-первых, это соответствует извлечению корней не второй, а четвертой степени (второй будет так:
y:=exp(1/2*ln(x+3))+exp(1/2*ln(x-1));), а во-вторых - оператор Sqrt - это нормальный паскалевский оператор извлечения квадратного корня, и переходить к логарифмам-экспонентам тут вовсе ни к чему! Всё, что надо - это записать
y:=sqrt(x+3)+sqrt(x-1);
Или там какое-то другое выражение? Что значит "под корнем эти два выражения"?
Еще вопрос - почему во второй формуле Вы берете х+с в скобки? Как на самом деле надо
так: 1/х + с
или так: 1/(х+с) ?
Уточните, пожалуйста.
А программа пишется так:
Код:
Var
 x,y:real;
Begin
 write('x= ');
 readln(x);
 y:= {здесь Вы вписываете одну из трёх формул}
 writeln('y= ',y:0:8);
 readln
End.
__________________
With Mozilla Firefox - straight to communism!
Vladimir_S на форуме   Ответить с цитированием
Ads
Старый 03.02.2012, 14:49   #6 (permalink)
Member
 
Регистрация: 01.02.2012
Сообщений: 66
Репутация: 10
По умолчанию

y:=exp(1/4*ln(x+3))+exp(1/4*ln(x-1)); - тут в первом exp(1/4*ln(x+3)) из под корня степень есть-4,а во втором из под корня 6.я еще не правильно написала.. тоесть со степенями эти корни.. не знаю как объяснить.не разбираюсь.

1/(х+с) - здесь мне так написал программсит знакомый один, я не знаю точно..
Гульназ.М. вне форума   Ответить с цитированием
Старый 03.02.2012, 14:54   #7 (permalink)
Member
 
Регистрация: 01.02.2012
Сообщений: 66
Репутация: 10
По умолчанию

y:=exp(1/4*ln(x+3))+exp(1/4*ln(x-1)); - в первом exp(1/4*ln(x+3)) из под корня степень есть- это 4,а во втором из под корня 6.я еще не правильно написала.. тоесть со степенями эти корни.. еще так в лекции написано было в примерах..

1/(х+с)-это не знаю, не я писала

а вот на счет программы там какая то проверка условия должна быть, говорили что за проверка
Гульназ.М. вне форума   Ответить с цитированием
Старый 03.02.2012, 14:54   #8 (permalink)
Специалист
 
Аватар для Vladimir_S
 
Регистрация: 27.08.2008
Адрес: Санкт-Петербург
Сообщений: 14,426
Репутация: 6876
По умолчанию

М-да, не очень понял... А у Вас есть текст исходного задания? Может быть, сфотографируете и выложите? Тогда, думаю, разберемся.
__________________
With Mozilla Firefox - straight to communism!
Vladimir_S на форуме   Ответить с цитированием
Старый 03.02.2012, 14:59   #9 (permalink)
Member
 
Регистрация: 01.02.2012
Сообщений: 66
Репутация: 10
По умолчанию

ну вот я сделала программы, но не работают они, препод вовсе сказал что нужна прверка условий и не принял работы мои...(
program zadanie_1;
var
x,a,c: integer;
y: real;
begin
write('Vvedite X - ');
readln(x);
write('Vvedite A - ');
readln(a);
write('Vvedite C - ');
readln(c);
y:= sqrt(x-a)+(1/(x+c));
Writeln('Y = ',y:6:2);
Readln;
end.

program zadanie_2;
var
x,y: real;
begin
write('Vvedite X - '); {x<1}
readln(x);
y:= ln(arctan(ln(x/sqr(x))));
Writeln('Y = ',y:10:5);
Readln;
end.

program zadanie_3;
var
x: integer;
y: real;
begin
write('Vvedite X - ');
readln(x);
y:= exp(1/4*ln(x+3))+exp(1/4*ln(x-1));
Writeln('Y = ',y:6:2);
Readln;
end.
Гульназ.М. вне форума   Ответить с цитированием
Старый 03.02.2012, 15:02   #10 (permalink)
Member
 
Регистрация: 01.02.2012
Сообщений: 66
Репутация: 10
По умолчанию

ну могу в принципе, сейчас
Гульназ.М. вне форума   Ответить с цитированием
Ads
Ответ

Опции темы
Опции просмотра

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Выкл.
HTML код Выкл.
Trackbacks are Вкл.
Pingbacks are Вкл.
Refbacks are Выкл.


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Помогите, пожалуйста, с программой на Паскале Juliet Delphi, Kylix and Pascal 11 17.12.2011 03:45
Помогите, пожалуйста, решить в Паскале maradelly Delphi, Kylix and Pascal 0 16.12.2011 17:11
Помогите пожалуйста с программой на паскале Severina Delphi, Kylix and Pascal 1 12.12.2011 20:05
Помогите пожалуйста решить матрицу в паскале NeYmEiKa Помощь студентам 0 24.05.2011 15:56
Помогите пожалуйста написать проги в паскале IRBIS Помощь студентам 1 18.05.2011 16:28
Помогите, пожалуйста, с программой в Паскале Андрей Романюк Помощь студентам 4 16.05.2011 20:10
Помогите пожалуйста составить программку в паскале Анастасия9 Delphi, Kylix and Pascal 2 14.04.2011 08:53
Пожалуйста, помогите в написании программы на Паскале павля Помощь студентам 2 26.02.2011 15:03
Пожалуйста, помогите с задачей в Паскале. scald Помощь студентам 15 19.02.2010 00:52
Помогите пожалуйста решить задачи на паскале. Swarowska Помощь студентам 1 22.12.2009 15:21
Помогите, пожалуйста, с написанием программы на Паскале romka91 Помощь студентам 3 22.11.2009 15:46
Пожалуйста помогите со стеками в Паскале! Ось Delphi, Kylix and Pascal 0 19.12.2008 21:19

-->
Часовой пояс GMT +4, время: 19:29.


Powered by vBulletin® Version 3.8.8
Copyright ©2000 - 2012, Jelsoft Enterprises Ltd.