Даны две строки, в каждой из которых содержится длинное натуральное число (количество цифр в каждом более 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())))
Комментариев нет:
Отправить комментарий