Giúp em vs ạ Đag k.tra Viết chương trình nhập một dãy n số nguyên và một dãy m số nguyên tính tổng của mỗi dãy cho biết dãy nào có tổng lớn hơn Giúp em vs Em còn 5phút huhu

kieuoanharmy0109

2 năm trước

Loga Sinh Học lớp 12

0 lượt thích 19 xem

1 trả lời

Thích Trả lời

nguyetnt.vtbn

program tong_day;

var A,B:array[1..1000] of integer;

n,m,i,t1,t2:integer;

begin

clrscr;

write('Nhap n: '); readln(n);

t1:=0;

for i:=1 to n do

begin

write('Nhap so thu ',i,' cua day n so: '); readln(A[i]);

t1:=t1+A[i];

end;

write('Nhap m: '); readln(m);

t2:=0;

for i:=1 to m do

begin

write('Nhap so thu ',i,' cua day m so: '); readln(B[i]);

t2:=t2+B[i];

end;

writeln('Tong cua day n so la: ',t1);

writeln('Tong cua day m so la: ',t2);

if t1=t2 then write('=> Tong hai day bang nhau')

else if t1>t2 then write('=> Tong day n so lon hon')

else write('=> Tong day m so lon hon');

readln;

end.

Vote (0) Phản hồi (0) 2 năm trước

nthl2109@gmail.com

var a, b: array[1..250] of integer;

n, m, i: byte;

sn, sm: word;

Begin

Sn:=0, sm:=0;

Write('n = '); readln(n);

For i:=1 to n do

Begin

Write('a[', i, '] = '); readln(a[i]);

Sn:=sn+a[i];

End;

Write('m = '); readln(m);

For i:=1 to m do

Begin

Write('b[', i, '] = '); readln(b[i]);

Sm:=sm+b[i];

End;

If sn>sm

then write('day a co tong lon hon')

Else if sm>sn

Then write('day b co tong lon hon')

Else write('hai day co tong bang nhau');

Readln

End.

Vote (0) Phản hồi (0) 2 năm trước

Các câu hỏi liên quan

.Tâm giúp bán cam trong ba ngày, Ngày thứ hai: số cam bán được tăng 10% so với ngày thứ nhất. Ngày thứ ba: số cam bán được giảm 10% so với ngày thứ hai. Bạn có biết trong ngày thứ nhất và ngày thứ ba thì ngày nào Tâm bán được nhiều cam hơn không ?

Giúp em câu 4,5 với ạ Em cảm ơn ạ

Vẽ đậu mầm vui vẻ ^^ Lâu lắm r tôi mới vô hoidap Nhớ quá Chắc tui nghỉ hoidap gần 1năm bây h vô lại coi ntn ,))

Cho biết chính sách đối ngoại ở trung quốc thời phong kiến??? Ko cop mạng=bc!

một đội công nhân có 8 người làm trong 6 ngày dc 360m đường.hỏi 12 người đắp xong 1080m đường trong bn ngày

Nêu tầm quan trọng của chuồng nuôi Nêu tiêu chuẩn chuồng nuôi hợp vệ sinh

Cho 17,6 (g) hỗn hợp gồm Mg và Fe tác dụng vừa đủ với 500 (ml) dung dịch HCl thu được 46 (g) muối. Tìm % khối lượng của Mg và Fe có trong hỗn hợp ban đầu. Bài này làm sao ạ giúp mình vs

- úngsự tạo ảnh ở múng màng lưới

1+(5-3)+(9-7)+...+(2005-2003)=?

Phân loại và gọi tên các hợp chất sau Zn(HSO4)2................. CaHPO4 Al2(HPO4)3 Ca(H2PO4)2 GIÚP EM VỚI MỌI NGỪI ƠI CẦN GẤP

Loga.vn - Cộng Đồng Luyện Thi Trực Tuyến