|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
|
Опции темы | Поиск в этой теме |
28.02.2013, 20:54 | #11 | |
Пользователь
Регистрация: 27.02.2013
Сообщений: 66
|
Цитата:
PROGRAM program3; USES crt; VAR x,y,R: real; BEGIN if (x<-9) or (x>9) then WriteLn('Значение функции не определено!') else begin if (x>=-9) and (x<=-6) then y := - sqrt( sqr(R) - sqr(x+6) ); if (x>-6) and (x<=-3) then y := x + 3; if (x>-3) and (x<=0) then y := sqrt( sqr(R) - sqr(x) ); if (x>0) and (x<=3) then y := 3 - x; if (x>3) and (x<=9) then y := 0.5 * (x - 3); WriteLn('y = ', y:0:4); {выведем вещественный результат с 4-мя зн.после запятой} end; END. |
|
28.02.2013, 20:57 | #12 |
Пользователь
Регистрация: 27.02.2013
Сообщений: 66
|
Я понимаю, что чайник, но какая здесь ошибка?)
|
28.02.2013, 21:08 | #13 |
Форумчанин
Регистрация: 07.02.2013
Сообщений: 267
|
Как минимум, не задали значения переменной R.
Μολὼν λαβέ
|
28.02.2013, 21:12 | #14 |
Новичок
Джуниор
Регистрация: 11.10.2011
Сообщений: 3,882
|
И x тоже хранит в себе не понять что.
|
28.02.2013, 21:12 | #15 | |
Made In USSR!
Старожил
Регистрация: 01.09.2010
Сообщений: 3,657
|
Цитата:
"...В жизни я встречал друзей и врагов.В жизни много всего перевидал.Солнце тело мое жгло, ветер волосы трепал,но я смысла жизни так и не узнал..."
(c) Юрий Клинских aka "Хой" |
|
28.02.2013, 21:20 | #16 |
Пользователь
Регистрация: 27.02.2013
Сообщений: 66
|
Не понимаю как ввести правильно, хоть убейте)
VAR x: ? у: real; R: ? Что то здесь не то? Да? |
28.02.2013, 21:23 | #17 |
Made In USSR!
Старожил
Регистрация: 01.09.2010
Сообщений: 3,657
|
Код:
"...В жизни я встречал друзей и врагов.В жизни много всего перевидал.Солнце тело мое жгло, ветер волосы трепал,но я смысла жизни так и не узнал..."
(c) Юрий Клинских aka "Хой" |
28.02.2013, 21:25 | #18 |
мальчик-помогай =)
Форумчанин
Регистрация: 16.09.2010
Сообщений: 522
|
Код:
Последний раз редактировалось GreenWizard; 28.02.2013 в 21:27. |
28.02.2013, 21:29 | #19 |
Пользователь
Регистрация: 27.02.2013
Сообщений: 66
|
Всё! Понял!)
Спасибо большое!!! |
28.02.2013, 21:34 | #20 | |
Пользователь
Регистрация: 27.02.2013
Сообщений: 66
|
Цитата:
GreenWizard! По Вашему коду, пишет ошибку: R = число; // <- !! Список ошибок: Неожиданный символ 'ч' |
|
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Вычислить с заданной точностью значение функции, представленной в виде бесконечного ряда | _ROBERT_ | Помощь студентам | 7 | 30.10.2012 21:57 |
Написать программу, которая вычисляет приближенное значение числа e с заданной точностью | quade1992 | Паскаль, Turbo Pascal, PascalABC.NET | 3 | 08.11.2011 15:10 |
программа, которая по заданному значению соответствующего элемента вычисляла бы значение всех остальных элементов. | Axsel145 | Помощь студентам | 0 | 24.09.2011 23:28 |
вычисление функции по значению аргумента | specialist | Паскаль, Turbo Pascal, PascalABC.NET | 0 | 13.05.2011 23:08 |