pascal高精度運(yùn)算(加法篇)-資料下載頁
2025-08-05 19:19本頁面
【正文】 rray[1..100] of longint。 var n,i:integer。 begin readln(n)。 f[1]:=1。 f[2]:=1。 for i:=3 to n do f[i]:=f[i2]+f[i1]。 writeln(f[n])。 end. readln(n)。 a[1]:=1。b[1]:=2。 for i:=3 to n do begin k:=0。 for j:=1 to 2100 do begin c[j]:=a[j]+b[j]+k。 k:=c[j] div 10。 c[j]:=c[j] mod 10。 end。 a:=b。b:=c。 end。 k:=2100。 while c[k]=0 do k:=k1。 for i:=k downto 1 do write(c[i])。 思考、高精度減法運(yùn)算 問題表述： 輸入 a， b（ 10240）兩個數(shù)，輸出 ab的值。 樣例 2輸入： 999 1000 樣例 2輸出： 1 樣例 1輸入： 456 409 樣例 1輸出： 47
外語相關(guān)推薦
鄂ICP備17016276號-1