16.07.2020, 16:47 [+3 UTC]
в нашей команде: 4 669 чел. | участники онлайн: 1 (рекорд: 21)

:: РЕГИСТРАЦИЯ

задать вопрос

все разделы

правила

новости

участники

доска почёта

форум

блоги

поиск

статистика

наш журнал

наши встречи

наша галерея

отзывы о нас

поддержка

руководство

Версия системы:
7.89 (25.04.2020)
JS-v.1.45 | CSS-v.3.39

Общие новости:
13.04.2020, 00:02

Форум:
10.07.2020, 10:13

Последний вопрос:
16.07.2020, 12:49
Всего: 152739

Последний ответ:
16.07.2020, 16:21
Всего: 260334

Последняя рассылка:
16.07.2020, 15:15

Писем в очереди:
0

Мы в соцсетях:

Наша кнопка:

RFpro.ru - здесь вам помогут!

Отзывы о нас:
25.10.2009, 13:42 »
Kom906
Спасибо! И отдельное спасибо за возможность предоставления исходников. [вопрос № 173643, ответ № 255811]
16.11.2016, 18:08 »
svrvsvrv
Спасибо. Вы даёте очень понятное объяснение. [вопрос № 190041, ответ № 274267]

РАЗДЕЛ • Pascal / Delphi / Lazarus

Создание программ на языках Pascal, Delphi и Lazarus.

[администратор рассылки: Зенченко Константин Николаевич (Старший модератор)]

Лучшие эксперты в этом разделе

Зенченко Константин Николаевич
Статус: Старший модератор
Рейтинг: 359
puporev
Статус: Профессор
Рейтинг: 93
Gluck
Статус: 1-й класс
Рейтинг: 2

Перейти к консультации №:
 

Консультация онлайн # 146148
Раздел: • Pascal / Delphi / Lazarus
Автор вопроса: Енисеева Кира Витальевна
Отправлена: 06.10.2008, 03:14
Поступило ответов: 0

Здравствуйте
Я учусь на 1ом курсе института, так получилось, что в начале года я заболела и теперь не могу написать лабораторную по турбо паскалю(((
Очень нужна помощь

Надо составить программу вычисления Z(x) для произвольного x
{y1-y2, |y1|>=|y2|
z={y1=2*y2, |y1|<|y2|

{Корень из(2=|x|), x<2
y1={4-x^2/2, x>=2

y2=3+x

Помогите пожалуйста, желательно кодом программы

Состояние: Консультация закрыта

Oтветов пока не поступило.

Мини-форум консультации № 146148
puporev
Профессор

ID: 401888

# 1

= общий = | 06.10.2008, 06:39 | цитировать цитировать  | профиль профиль  |  отправить письмо в личную почту пейджер

Поскольку все условие "съехало", невозможно разобрать, что написано.
Напмшите четко
при x<2 y1=... y2=...
при |y1|>=|y2| z=...
при |y1|<|y2| z=...
при x>=2 y1=.... y2=...
при |y1|>=|y2| z=...
при |y1|<|y2| z=...
Непонятно например Корень из(2=|x|),



неизвестный

# 2

= общий = | 06.10.2008, 09:36

при x<2 y1= корню из(2+|x|)
при x>=2 y1=4-x^2/2
y2=3+x при любом x
при |y1|>=|y2| z=y1-y2
при |y1|<|y2| z=y1+2*y2

Вроде так

puporev
Профессор

ID: 401888

# 3

= общий = | 06.10.2008, 14:16 | цитировать цитировать  | профиль профиль  |  отправить письмо в личную почту пейджер

uses crt;
var x,y1,y2,z:real;
begin
clrscr;
write('x=');readln(x);
y2:=3+x;
if x<2 then y1:=sqrt(2+abs(x))
else y1:=4-x*x/2;
if abs(y1)>=abs(y2)then z:=y1-y2
else z:=y1+2*y2;
write('z=',z:0:3);
readln
end.

неизвестный

# 4

= общий = | 06.10.2008, 22:41

Спасибо большое :)

 

Возможность оставлять сообщения в мини-форумах консультаций доступна только после входа в систему.
Воспользуйтесь кнопкой входа вверху страницы, если Вы зарегистрированы или пройдите простую процедуру регистрации на Портале.

Rambler's Top100

главная страница | поддержка | задать вопрос

Время генерирования страницы: 0.14185 сек.

© 2001-2020, Портал RFPRO.RU, Россия
Калашников О.А.  |  Гладенюк А.Г.
Версия системы: 7.89 от 25.04.2020
Версия JS: 1.45 | Версия CSS: 3.39