program um;
{$APPTYPE CONSOLE}
uses
SysUtils;
var
y,x,z: double;
begin
z := 0;
write('Введите x: ');
readln(x);
write('Введите y: ');
readln(y);
z := x*z;
write(x);
write('*');
write(y);
write('=');
write(z);
readln;
end.
Умножения многозначных чисел [Delphi]
Задание. Составить программу для умножения многозначных чисел.
у меня вот, что получилось:
разве всё так просто?.. или я ахинею написал?
у меня вот, что получилось:
Код:
разве всё так просто?.. или я ахинею написал?
Есть у меня сильное подозрение, что числа должны быть представлены в строковом виде(или массивом цифр). :)
Цитата: wanja
числа должны быть представлены в строковом виде :)
Это как?
Это называется "Длинная арифметика". Реализацию на С++ я выкладывал в разделе Студентам, поиск рулит:)
