пр-ма умножения длинных десятич. чисел.не работает (

04.12.2012, 22:47. Показов 645. Ответов 0

Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам

Суть задачи: Заданы 2 строки десятичных символов (длинное десятичное число в символьной форме) Разработать программу умножения первого десятичного числа на второе. Произведение в форме строки с десятичными символами. (результаты в диаграмме).
Я написала, но проблема в том, что числа должны быть длинными, а у меня перемножаются только максимум четырехзначные, может кто объяснит, что не так.. вот код

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
  
program diagram;
uses crt, GraphAbc;
Const
naz: array [1..2] of string= ('желтый','зеленый');
col: array [1..3] of integer = (clYellow, clLime, Clred);
var f:text;
a:array[1..10] of integer;
u, u0,s,n,i,x:integer;
begin
setWindowSize (450,450); {размер окна} s:=0; u0:=0;
SetFontSize(16); {размер шрифта}
assign (f,'C:\123\data.txt');
reset (f);
n:=0;
while not eof (f) do
begin
inc (n);
read (f,a[n]);
end;
close (f);
for i:=1 to 2 do S:=S+a[i]; {вычисление сумарной площади}
for i:=1 to 2 do
begin
SetBrushColor(col[i]);      {цвет заливки}
u:=u0 + round (a[i]*360/S)+1;
Pie (200,240,140,u0,u); {рисование сектроа}
textout (0,0+((i-1)*25), inttostr(a[i]));
u0:=round ((a[i]*100)/S);
textout(300,0+((i-1)*25), inttostr(u0)+'%');
u0:=u;
end;
SetBrushColor(col[3]); {ЦВЕТ ЗАЛИВКИ КРАСНЫЙ}
S:=a[1]*a[2];
textout (0,50,'Произведение чисел = '+inttostr(S));
end.

Добавлено через 1 час 12 минут
знаю что проблемы с типом данных, там вовсе не int должен быть, ибо 255 символов маловато.. ну help me please

cpp_developer

Эксперт

20123 / 5690 / 1417

Регистрация: 09.04.2010

Сообщений: 22,546

Блог

04.12.2012, 22:47

Ответы с готовыми решениями:

Метод Карацубы умножения длинных чисел
Реализован клас длинных чисел, с перегруженными операциями сложения, вычитания, умножения столбиком и реализован метод умножения Карацубы....

Написать функцию для поразрядного умножения длинных целых чисел, представленных строками символов, и тестирующ
Задание :"Написать функцию для поразрядного умножения длинных целых чисел, представленных строками символов, и тестирующую программу к...

Составить программу для сложения, разности, умножения и деления "длинных" чисел
Нужно составить программу для сложения, разности, умножения и деления "длинных" чисел в Паскале! Заранее очень благодарен

Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.

raxper

Эксперт

30234 / 6612 / 1498

Регистрация: 28.12.2010

Сообщений: 21,154

Блог

04.12.2012, 22:47

Помогаю со студенческими работами здесь

Неправильно работает цикл. Произведение длинных чисел
Помогите исправить программу. Она не верно считает произведение длинных чисел. Я не понимаю, что не так в цикле... В теории, он верный....

Алгоритм умножения длинных целых в знаковом коде
uint8_t Data; //This is the number. The encoding is additional code. The byte order is little-endian. Массив "сырых" байт, а на самом...

Опишите функцию умножения двух целых чисел, обработайте ошибку умножения на ноль
Задача: Опишите функцию умножения двух целых чисел, обработайте ошибку умножения на ноль. Я не понимаю лишь то, как обработать именно...

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

Вычислить сумму двух длинных бинарных чисел, используя сложение чисел в двоичной системе счисления
Задано положительное и отрицательное число в двоичной системе.Составить программу вычисления суммы этих чисел, используя сложения чисел в...

Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:

Новые блоги и статьи Все статьи Все блоги /
делаю науч статью по влиянию грибов на сукцессию anaschu 13.03.2026 прикрепляю статью	SDL3 для Desktop (MinGW): Создаём пустое окно с нуля для 2D-графики на SDL3, Си и C++ 8Observer8 10.03.2026 Содержание блога Финальные проекты на Си и на C++: hello-sdl3-c. zip hello-sdl3-cpp. zip Результат:	Установка CMake и MinGW 13.1 для сборки С и C++ приложений из консоли и из Qt Creator в EXE 8Observer8 10.03.2026 Содержание блога MinGW - это коллекция инструментов для сборки приложений в EXE. CMake - это система сборки приложений. Здесь описаны базовые шаги для старта программирования с помощью CMake и. . .	Как дизайн сайта влияет на конверсию: 7 решений, которые реально повышают заявки Neotwalker 08.03.2026 Многие до сих пор воспринимают дизайн сайта как “красивую оболочку”. На практике всё иначе: дизайн напрямую влияет на то, оставит человек заявку или уйдёт через несколько секунд. Даже если у вас. . .
Модульная разработка через nuget packages DevAlt 07.03.2026 Сложившийся в . Net-среде способ разработки чаще всего предполагает монорепозиторий в котором находятся все исходники. При создании нового решения, мы просто добавляем нужные проекты и имеем. . .	Модульный подход на примере F# DevAlt 06.03.2026 В блоге дяди Боба наткнулся на такое определение: В этой книге («Подход, основанный на вариантах использования») Ивар утверждает, что архитектура программного обеспечения — это структуры,. . .	Управление камерой с помощью скрипта OrbitControls.js на Three.js: Вращение, зум и панорамирование 8Observer8 05.03.2026 Содержание блога Финальная демка в браузере работает на Desktop и мобильных браузерах. Итоговый код: orbit-controls-threejs-js. zip. Сканируйте QR-код на мобильном. Вращайте камеру одним пальцем,. . .	SDL3 для Web (WebAssembly): Синхронизация спрайтов SDL3 и тел Box2D 8Observer8 04.03.2026 Содержание блога Финальная демка в браузере. Итоговый код: finish-sync-physics-sprites-sdl3-c. zip На первой гифке отладочные линии отключены, а на второй включены:. . .

Наверх