Lập trình đơn giản

Phạm Thái

Viết chương trình nhập vào một số nguyên dương N (10<N<10\(^{10}\)) từ bàn phím. Hãy tách số N thành hai số nguyên dương a và b, mỗi số gồm các chữ số liên tiếp nhau của N sao cho tổng a+b đạt giá trị lớn nhất.
In ra hai số a và b thỏa mãn, mỗi số trên một dòng
ví dụ

Nhập In ra
N=2708 2 708

Nguyễn Lê Phước Thịnh
23 tháng 11 2019 lúc 23:55

câu hỏi này bạn nên để chị @Nguyễn Minh Lệ trả lời giúp bạn

Bình luận (0)
 Khách vãng lai đã xóa
Minh Lệ
24 tháng 11 2019 lúc 9:51

Program hotrotinhoc;

var a,b,max,x,d,i,y: longint;

n,k,s: string;

begin

readln(n); s:=n;

while length(n)<>1 do

begini:=i+1;
k:=k+

s[i];

val(k,x);

delete(n,1,1);

val(n,y);

d:=x+y;

if d>max then

begin

max:=y+x;

a:=x;

b:=y;

end;

end;

write(a,' ',b);

readln

end.

Bình luận (0)
 Khách vãng lai đã xóa

Các câu hỏi tương tự
Phan Đức Duy
Xem chi tiết
Quỳnh
Xem chi tiết
haizzz!!
Xem chi tiết
đức minh
Xem chi tiết
nguyễn vũ thành công
Xem chi tiết
Hưng Quốc
Xem chi tiết
Nguyễn Linh
Xem chi tiết
duy lê
Xem chi tiết
khonopro
Xem chi tiết