Viết chương trình nhập N số nguyên nhập từ bàn phím, in ra màn hình số nhỏ nhất và lớn nhất?

317

Tailieumoi.vn biên soạn và giới thiệu bộ câu hỏi Tin học gồm các kiến thức lý thuyết và thực hành, giúp học sinh ôn tập và bổ sung kiến thức cũng như hoàn thành tốt các bài kiểm tra môn Tin học. Mời các bạn đón xem:

Top 1000 câu hỏi thường gặp môn Tin học (Phần 6)

Câu 25: Viết chương trình nhập N số nguyên nhập từ bàn phím, in ra màn hình số nhỏ nhất và lớn nhất?

Lời giải:  

program tim_max_min ;

var i,n,max,min:integer;

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

begin

write('nhap do dai cua day so n=');readln(n);

writeln('nhap cac phan tu cua day so :');

for i:=1 to n do

begin

write('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('so lon nhat la:',max);

writeln('so be nhat la:',min);

readln

end.

Đánh giá

0

0 đánh giá