|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
17.05.2017, 07:24 | #1 |
Новичок
Джуниор
Регистрация: 17.05.2017
Сообщений: 2
|
Процедуры и Функции. Вычислить выражения, определить в ней повторяющаяся часть выражения
Вычислить выражения, определить в ней повторяю-ся часть выражения
в виде Процедуры (13+sqrt(7)/7+sqrt(13))+(15+sqrt(12)/sqrt(15)+12)+(sqrt(21)+32/sqrt(32)+21) program J; var a,b: real; procedure S(a,b:real; var p:real); begin P:=a+sqrt(b)/a+sqrt(b) S(13,sqrt(7); S(15 не пойму, что в выходящем писать |
17.05.2017, 10:31 | #2 |
Старожил
Регистрация: 04.02.2011
Сообщений: 4,619
|
Нет тут повторяющихся частей. Поизвращавшись, можно за уши притянуть общность первой и последней части, но это совсем уж через %%пу. И лучше бы этот бред не через процедуру, а через функцию.
Код:
PS А кто такой - выходящий ? "Гражданин, вы выходите?" Последний раз редактировалось digitalis; 17.05.2017 в 10:38. |
17.05.2017, 11:06 | #3 |
Старожил
Регистрация: 20.04.2008
Сообщений: 5,528
|
Код:
программа — запись алгоритма на языке понятном транслятору
|
19.05.2017, 08:48 | #4 |
Старожил
Регистрация: 04.02.2011
Сообщений: 4,619
|
Тогда уж :
Код:
"Я бы взял частями, но мне нужно сразу!" © О.Бендер |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
В зависимости от значения некоторого выражения вычислить значения функции y(x), определенной на отрезке [a;b], в узлах разбиения данного отрезка с постоянным шагом h. | Маська07 | Помощь студентам | 3 | 13.01.2017 12:44 |
Используя любой из видов циклов, вычислить значения выражения. выражения: Y=ln(x-1)+b | Roshen | Паскаль, Turbo Pascal, PascalABC.NET | 2 | 18.12.2016 12:18 |
Вычислить выражения | now2 | Assembler - Ассемблер (FASM, MASM, WASM, NASM, GoASM, Gas, RosAsm, HLA) и не рекомендуем TASM | 9 | 24.04.2014 08:21 |
Дана строка, арифметические выражения вида A x B. Вычислить значение выражения | Un1q | Паскаль, Turbo Pascal, PascalABC.NET | 4 | 09.12.2013 14:47 |
вычислить значение выражения (функции) | евгенияФ | Помощь студентам | 5 | 09.10.2011 12:45 |