KHÁM PHÁ Học Toán + Tiếng Anh theo Sách Giáo Khoa cùng học online và gia sư dạy kèm tại nhà từ lớp 1 đến lớp 12 với giá cực kỳ ưu đãi kèm quà tặng độc quyền"CỰC HOT".
uses crt; var i,j,tong,n,max,vt,m:longint; a:array[1..1000]of longint; begin clrscr; write(‘n=’);readln(n); for i:=1 to n do begin write(‘Do dai cua day thu ‘,i,’: ‘);readln(m); tong:=0; for j:=1 to m do begin write(‘a[‘,j,’]=’);readln(a[i]); inc(tong,a[i]); end; if tong>max then begin max:=tong; vt:=i; end; end; writeln(‘Day co tong lon nhat la day thu ‘,vt); readln end.
#include <iostream>
using namespace std;
int main()
{
int n,a,totall=0,max1=0,max2=0;
cout<<“Nhap so mang: “;
cin>>n;
int arr[n];
for(int i=0;i<n;i++){
cout<<“Nhap so phan tu mang thu “<<i+1<<“: “;
cin>>arr[i];
if(max2<arr[i]){
max2=arr[i];
}
}
for(int i=0;i<n;i++){
cout<<“Nhap mang thu “<<i+1<<“: “;
for(int j=0;j<arr[i];j++){
cin>>a;
totall+=a;
}
if(max1<totall){
max1=totall;
}
totall=0;
}
cout<<max1;
//samon247
return 0;
}
uses crt;
var i,j,tong,n,max,vt,m:longint; a:array[1..1000]of longint;
begin
clrscr;
write(‘n=’);readln(n);
for i:=1 to n do
begin
write(‘Do dai cua day thu ‘,i,’: ‘);readln(m);
tong:=0;
for j:=1 to m do
begin
write(‘a[‘,j,’]=’);readln(a[i]);
inc(tong,a[i]);
end;
if tong>max then begin max:=tong; vt:=i; end;
end;
writeln(‘Day co tong lon nhat la day thu ‘,vt);
readln
end.