высчитывание мматематических формул в Pascal

[sasha55]

Ребята,так как я не являюсь студентом технического вуза и не понимаю ничего в программировании,прошу у вас помощи.
fTlEDVfk0Dw_cr.jpg
fTlEтлDVfk0Dw_cr.jpg
Информатик просил,чтобы программа высчитывала от [-5;5] с шагом в 0,5.

[netpolice]

http://www.programmersforum.ru/showthread.php?t=232675

Вот похожая задача, если что непонятно спрашивайте

[s-andriano]

Сообщение от sasha55

я не являюсь студентом технического вуза и не понимаю ничего в программировании

Значит, оно Вам не надо.

[sasha55]

дело в том,что она не срабатывает((выдает ошибку.

[sasha55]

Сообщение от s-andriano

Значит, оно Вам не надо.

вы правы мне в действительности это не надо,но преподавателю не объяснишь суть данной проблемы. его не заботит надо или не надо. Ему нужен результат. Сама результата добиться я не могу,поэтому обратилась к вам))Ваше дело отказаться либо согласиться. Мне остается лишь поблагодарить тех,кто не отказал в помощи))

[s-andriano]

Сообщение от sasha55

преподавателю не объяснишь суть данной проблемы. его не заботит надо или не надо. Ему нужен результат.

Позвольте Вам не поверить.
Идите в деканат и забирайте документы, после чего ни один преподаватель Вам слова не скажет.

А если Вы, все-таки, решите, что диплом Вам "надо", значит, нужно и все, что предусмотрено учебной программой.

"Не надо" может быть только одновременно с дипломом.
Собственно, и никому и "не надо" недоучек с дипломами.

[sasha55]

Сообщение от s-andriano

Позвольте Вам не поверить.
Идите в деканат и забирайте документы, после чего ни один преподаватель Вам слова не скажет.

А если Вы, все-таки, решите, что диплом Вам "надо", значит, нужно и все, что предусмотрено учебной программой.

"Не надо" может быть только одновременно с дипломом.
Собственно, и никому и "не надо" недоучек с дипломами.

Вы конечно все верно говорите, и я не могу с вами не согласиться.У вас большой опыт и вам безусловно виднее это. Но я просила всего лишь помощи,если у вас нет хотения помочь в том,в чем вы профессионал,ну что ж ничего страшного. Я всего лишь не понимаю как Pascal встретится студенту-лингвисту в его будущей возможной карьере. Я понимаю,если преподаватель доступно объяснил данную тему,но он сказал изучать ее самому,что для меня представляет труд. Если бы вы смогли помочь мне с этим заданием,то по аналогии я смогла бы решить другие задачи))

[s-andriano]

Сообщение от sasha55

Я всего лишь не понимаю как Pascal встретится студенту-лингвисту в его будущей возможной карьере.

Это плохо.
1. Это плохо само по себе. Плохо, что этого Вам не объяснили.
2. Еще хуже то, что Вы, не понимая, сами решили, что это Вам не нужно.
3. Ну и самое плохое - что Вы хотите получить диплом о В/О, но при этом не хотите быть минимально грамотным человеком.

И еще: наша система образования устроена так, что человек, как правило, получает образование раз и на всю жизнь.
И даже если окажется, что в ближайшие лет 5 вам это и не понадобится, подумайте о том, что будет через 10 лет, через 15, через 20...
В 40 лет очень непросто будет осваивать это с нуля.

Но сейчас никакая наука уже немыслима без математических методов и алгоритмической обработки информации. И лингвистика здесь не исключение.

[sasha55]

Сообщение от s-andriano

Это плохо.
1. Это плохо само по себе. Плохо, что этого Вам не объяснили.
2. Еще хуже то, что Вы, не понимая, сами решили, что это Вам не нужно.
3. Ну и самое плохое - что Вы хотите получить диплом о В/О, но при этом не хотите быть минимально грамотным человеком.

И еще: наша система образования устроена так, что человек, как правило, получает образование раз и на всю жизнь.
И даже если окажется, что в ближайшие лет 5 вам это и не понадобится, подумайте о том, что будет через 10 лет, через 15, через 20...
В 40 лет очень непросто будет осваивать это с нуля.

Но сейчас никакая наука уже немыслима без математических методов и алгоритмической обработки информации. И лингвистика здесь не исключение.

Все верно Вы говорите,когда-нибудь может пригодиться все то,чему мы не придаем большого значения,теперь я это понимаю. Зачем разводить дискуссию?! Помогите ,пожалуйста, лучше советом с чего хотя бы мне начать. Теги я знаю,как составить формулы, с этим проблема.

[Mad_Cat]

1)

var x,p,y:real;
begin
x:=-5;p:=3.14;
while x<=(5+0.25) do
begin
if x<=-p then y:=-p
else if x<=0 then y:=x
else if x<=p then y:=2*x
else y:=6;
writeln(x:6:3,' ',y:6:3);
x:=x+0.5;
end;
end.

2)

var x,p,y:real;
begin
x:=-5;p:=3.14;
while x<=(5+0.25) do
begin
if x<-p then y:=-1
else if x<=p then y:=cos(x)
else y:=1;
writeln(x:6:3,' ',y:6:3);
x:=x+0.5;
end;
end.