Phần mềm học tập

Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài
Trần Trọng Trí

Viết chương trình nhập vào một dãy số nguyên n trong mảng A; thực hiện tính tổng dãy số đó trong mảng A; sau đó thực hiện tìm giá trị lớn nhất trong mảng;

Nguyễn Lê Phước Thịnh
7 tháng 11 2022 lúc 16:06

uses crt;

var a:array[1..100]of integer;

i,n,t,ln:integer;

begin

clrscr;

readln(n);

for i:=1 to n do readln(a[i]);

t:=0;

ln:=a[1];

for i:=1 to n do 

begin

t:=t+a[i];

if ln<a[i] then ln:=a[i];

end;

writeln(t);

writeln(ln);

readln;

end.


Các câu hỏi tương tự
HOÀNG ĐẠI PHÚC
Xem chi tiết
Finn
Xem chi tiết
sery Lan
Xem chi tiết
Nguyễn Kim Trí
Xem chi tiết
Ngọc Thảo
Xem chi tiết
sery Lan
Xem chi tiết
Nguyễn Phúc
Xem chi tiết
Nhi Le
Xem chi tiết
Jonathan Joestar
Xem chi tiết
Anh Nguyen
Xem chi tiết