VPF::Процедуры и функции в Турбо Паскале

CaRaMeLка

Дата 9.6.2009, 21:06 (ссылка)

(голосов:1)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 1
Регистрация: 9.6.2009

Репутация: нет
Всего: нет

Помогите пожалуйсто решить три задачки!! Никак не получается!!! smile

1)Вычислить значение полинома Р(х)=а0+а1*х+а2*х^2+...+аn*x^n с использованием процедуры, реализующей алгоритм Р(х)=((...(аn+an+1)x+an-2)x+...+a1)x+a0. Значения х заданы в вещественном векторе х(4). Для каждого xi заданы n и коэффициенты а0,а1,...,аn. Результат расспечатать в виде таблицы xi, Pi.

2)Вычислить U=|(sin a-c)|e^-b, где a,b,c - минимальные эллементы матриц А(4,4), В(2,3), С(2,3). Нахождение минимума оформить в виде функции.

3)Дана строка 'A3+F4'. Вычислить значение натурального десятичного числа с использованием функции перевода 16-ричных символов в десятичное число.

Заранее очень благодарна!! Огромное спасибо!! smile

Модератор: Пожалуйста, один топик - один вопрос.

Это сообщение отредактировал(а) volvo877 - 11.6.2009, 09:45

Ozzя

Дата 10.6.2009, 07:31 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 86
Регистрация: 19.7.2004

Репутация: нет
Всего: 1

Код


s1:=s[1]+s[2];
s2:=s[4]+s[5];
a:=Hex2Dec(s1)+Hex2Dec(s2);

Функцию Hex2Dec легко можно найти в Интернете.

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Object Pascal: кроссплатформенные технологии \| Следующая тема »