Dùng ngôn ngữ lập trình pascal viết chương trình nhập vào tuổi của các bạn trong lớp, tìm và in ra tuổi của bạn lớn và nhỏ nhất trong lớp đó( làm giúp vs ạ, mai e thi r)

MrAnh

2 năm trước

Loga Sinh Học lớp 12

0 lượt thích 21 xem

1 trả lời

Thích Trả lời

xuandiem

program ct;

uses crt;

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

i,n,max,min:integer;

begin clrscr;

write(Nhap so ban trong lop: '); readln(n);

for i:=1 to n do

begin

writeln('Nhap tuoi cua bn thu ',i,': '); readln(T[i]);

end;

max:=T[1]; min:=T[1];

for i:=1 to n do

begin

if T[i]>max then max:=T[i];

if T[i]<max then min:=T[i];

end;

writeln('Tuoi cua ban lon nhat la: ',max);

writeln('Tuoi cua ban nho nhat la: ',min);

readln;

end.

Học tốt!

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

buithilananh712003

program ct;

uses crt;

var i,n,Max,Min:integer;

A:array[1..100] of integer;

begin

clrscr;

write('nhap n:=');readln(n);

for i:=1 to n do

begin

write('nhap tuoi A[',i,']:=');readln(A[i]);

end;

Max:=A[1]; Min:=A[1];

for i:=2 to n do

begin

if Max<A[i] then Max:=A[i];

if Min>A[i] then Min:=A[i];

end;

writeln('tuoi lon nhat la',Max);

writeln('tuoi nho nhat la:',Min);

readln

end.

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

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

vẽ giùm bạn cute này nha mọi người nhớ kí tên vô nha

Tính tổng: -1+2-3+4-5+...+98-99+100

vẽ giùm mik tranh này vs ak thankkkk ( tô màu nữa nha )

Trong công nghiệp, để điều chế axit sunfuric người ta thường dùng quặng pirit sắt. Tính khối lượng quặng pirit sắt cần dùng để điều chế 1,47 tấn axit sunfuric 98%. Biết hiệu suất từng quá trình lần lượt là 95%, 90% và 70%

Thiết bị đóng cắt điện gồm những gì ? Bảo vệ mạng điện gồm những gì ?

Phần tự luận bài 1, phần a, giúp em với mọi người ơi...em cảm ơn ạ

Giao thoa ánh sáng bằng 2 khe young với đồng thời 2 bức xạ đơn sắc lam đa 1 và lam đa 2 ( > lam đa 1 ) ( có bước sóng từ 400nm đến 750nm ). Khoảng vân ứng với lam đa 2 là 21 mm. Khoảng vân ứng với lam đa có thể nhận giá trị nào ? Đáp án cho: 9.0, 9.8, 10.6, 11.4 ( mm )

"Mental illness characterized by abnormal behavior and misinterpretation of reality" nghĩa là gì?

Mog ccasc bn zúp mk c ơmm 1 khi linh sơn lương hết mấy tuần khi khôi huyện quân không một đội , Hai câu thơ trên muốn nói đến khăn của nghĩa quân Lam Sơn vào thời kì nào? 2 Năm 1533, ai là người chạy vàoThanh Hóa ,Đưa dòng dõi nhà Lê lên làm vua với danh nghĩa "Phục Lê diệt Mạc" 3Luật Hồng Đức có những nét tiến bộ vì:

Cho hcn ABCD có AB =8 , BC=6 Vẽ đường cao AH của ∆ADB. Chưng minh a/ ∆AHB đồng dạng với ∆BCD b/ CD.AB=DB.HB c/Tính AH, DH, BH

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