Поиск по этому блогу

воскресенье, 19 января 2020 г.

Сумма длинных чисел 2

Даны две строки, в каждой из которых содержится длинное натуральное число (количество цифр в каждом более 100). В третьей строке сформировать их сумму.
Решение на Паскале
Program z3;
var a,b,c,z:string;
       i,m,n,k,u,h,d:integer;
begin
            writeln(‘Введите первое число’);
            readln(a);
            writeln(‘Введите второе число’);
            readln(b);
            m:=length(a);
            n:=length(b);
            if m<>n then
                        if m>n then
                                   begin
                                               k:=m;
                                               for i:=1 to m-n do
                                                           b:=’0’+b;
                                   end
                        else
                                   begin
                                               k:=n;
for i:=1 to n-m do
            a:=’0’+a;
                                   end;
            u:=0;
            c:=’’;
            for i:=k downto 1 do
                        begin
                                   val(copy(a,i,1),m,h);
val(copy(b,i,1),n,h); 
d:=m+n+u;
if d>9 then
            begin
                       u:=1;
                       d:=d mod 10 ;
            end
else
            u:=0;
str(d,z);
c:=z+c;
                        end;
if u<>0 then
begin
str(u,z);
c:=z+c;
                        end;
writeln(c);

end.

Решение на Питоне
print(str(int(input())+int(input())))

Комментариев нет:

Отправить комментарий