Компьютерный форум
Правила
Вернуться   Компьютерный форум > Форум программистов > Программирование под Windows > Delphi
Перезагрузить страницу Многочлены заданные списками
Ответ
 
Опции темы Опции просмотра
  (#1 (permalink)) Старый
Raptor757 Raptor757 вне форума
Новичок
 
Сообщений: 1
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Регистрация: 02.02.2017
По умолчанию Многочлены заданные списками - 02.02.2017, 20:22

Всем привет! прошу вашей помощи.
Я паскаль изучаю только неделю(как и питон).
Помогите написать программу на паскале, надо: умножить два многочлена заданные списками (массивами). вот: 2x^4-4x^2+1 умножить на x^3-2x

на питоне вот:
from itertools import product

a = [[2,4],[-4,2],[1,0]] #2x^4-4x^2+1 (первый элемент это коэффициент, а второй степень)
b = [[1,3],[-2,1]] #x^3-2x

def mult(first, second):
result_len = max(itm[1] for itm in first) + max(itm[1] for itm in second)
result = [0] * (result_len+2)

for itm1, itm2 in product(first, second):
power = itm1[1] + itm2[1]
result[power] += itm1[0] * itm2[0]
print(itm1, itm2, '=>', itm1[0] * itm2[0], power)

print(mult(a, b))

хочу разобраться и на паскале
Ответить с цитированием
Ads
Ответ

Опции темы
Опции просмотра

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Trackbacks are Вкл.
Pingbacks are Вкл.
Refbacks are Выкл.


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Функция,которая ищет заданные атомы в S-выражении. katja317 Lisp 3 10.06.2011 17:46
Задача со списками Loona Lisp 1 30.05.2011 01:31
Проблема по теме "Файлы". Определить сколько раз заданные слова встречаются в тексте. Nougami Pascal 0 16.04.2011 05:22
Переставить 2 элемента списка местами заданные по индексу Vall-i Lisp 0 19.12.2010 09:21
Задача со списками @katushka@ Prolog 1 04.10.2009 20:01
Необходимо перемножить многочлены, заданные списками коэффициентов frehrer Lisp 4 13.05.2009 17:32
Неприводимые, примитивные многочлены и CRC tentul Алгоритмы 7 12.11.2008 18:58
Необходимо перемножить 2 матрицы заданные StringGrid Krank C++ Builder 9 15.11.2007 13:03
Создание эмулятора нажатия мышки на заданные кнопки Rocky Вопросы начинающих программистов 2 29.11.2006 15:57
Как удалить из строки все заданные подстроки slayerwow Pascal 3 17.11.2005 19:42
Являются ли заданные X и Y последовательными элементами списка titanic Lisp 2 12.05.2004 23:51
Как передать в COM-порт заданные 16-ричные числа Anonymous WinAPI 4 21.10.2003 14:49



Powered by vBulletin® Version 3.8.7
Copyright ©2000 - 2018, Jelsoft Enterprises Ltd.
Нardforum.ru - компьютерный форум и программирование, форум программистов