洛谷 P1303 A*B Problem

来源：互联网发布：阿里云cdn测评编辑：程序博客网时间：2024/06/17 05:16

题目描述

求两数的积。

输入输出格式

输入格式：
两个数

输出格式：
积

输入输出样例

输入样例#1：
1
2
输出样例#1：
2
说明

需用高精

分析：高精乘模版题。

代码：

var i,x,y,j,z:integer;    m,n:ansistring;    a,b,c:array[1..10000] of int64;beginfor i:=1 to 10000 do c[i]:=0;           readln(m);read(n);x:=length(m);y:=length(n);for i:=1 to x doa[i]:=ord(m[x+1-i])-48;for i:=1 to y do                                     b[i]:=ord(n[y+1-i])-48;for i:=(x+1) to 10000 doa[i]:=0;                                      for i:=(y+1) to 10000 dob[i]:=0;for i:=1 to y dofor j:=1 to x doc[i-1+j]:=c[i-1+j]+a[j]*b[i];                  for i:=1 to 10000 doif c[i]>9 thenwhile c[i]>9 dobegin c[i+1]:=c[i+1]+c[i] div 10;                     c[i]:=c[i] mod 10;                          end;for i:=10000 downto 1 doif c[i]<>0 then break;for j:=i downto 1 do              write(c[j]);readln;readln;end.

0 0