Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Паскаль, Turbo Pascal, PascalABC.NET
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 08.10.2015, 17:38   #1
Анна_13
Новичок
Джуниор
 
Регистрация: 08.10.2015
Сообщений: 2
По умолчанию [РЕШЕНО]: Помогите пожалуйста составить программу в Pascal!!

Здравствуйте!
Нужно составить блок-схему и программу вычисления значения функции,заданной графиком,при произвольном значении х.
Я не могу понять как делать.
Заранее спасибо!!
zVLds8v3ziI.jpg

Решение в следующем сообщении

Последний раз редактировалось Вадим Мошев; 15.05.2018 в 18:02.
Анна_13 вне форума Ответить с цитированием
Старый 08.10.2015, 17:42   #2
Аватар
Старожил
 
Аватар для Аватар
 
Регистрация: 17.11.2010
Сообщений: 18,922
По умолчанию

Код:
if x<-pi/2 then y:=-x-pi/2
else if x<=pi/2 then y:=cox(x)
else y:=x-pi/2;
update

Подправил, минус забыл в 1-ой строчке
Если бы архитекторы строили здания так, как программисты пишут программы, то первый залетевший дятел разрушил бы цивилизацию

Последний раз редактировалось Аватар; 08.10.2015 в 17:48.
Аватар вне форума Ответить с цитированием
Старый 08.10.2015, 17:49   #3
Анна_13
Новичок
Джуниор
 
Регистрация: 08.10.2015
Сообщений: 2
По умолчанию

Спасибо!!!
Анна_13 вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Помогите составить программу пожалуйста!!!!!!!!! ))))) dodyks Помощь студентам 0 07.05.2009 20:38
Помогите пожалуйста составить программу vk- Паскаль, Turbo Pascal, PascalABC.NET 2 08.12.2008 22:10
Помогите, пожалуйста, составить программу на турбопаскале. Smartbass Помощь студентам 1 14.11.2008 01:12