Hãy Viết chương trình nhập vào 10 số nguyên từ bàn phím và in ra màn hình số lớn nhất

In ra màn hình theo chiều giảm dần từ n về 1 (Tin học - Đại học)

1 trả lời

Thủ tục lục giác (Tin học - Lớp 5)

2 trả lời

Gõ lệnh để được hình trên (Tin học - Lớp 5)

1 trả lời

Tính (Tin học - Lớp 6)

1 trả lời

In ra màn hình theo chiều giảm dần từ n về 1 (Tin học - Đại học)

1 trả lời

Thủ tục lục giác (Tin học - Lớp 5)

2 trả lời

Gõ lệnh để được hình trên (Tin học - Lớp 5)

1 trả lời

Tính (Tin học - Lớp 6)

1 trả lời

a) viết chương trình nhập N số nguyên từ bàn phím và in ra màn hình số nhỏ nhất.

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

• lý thuyết
• trắc nghiệm
• hỏi đáp
• bài tập sgk

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?

Các câu hỏi tương tự

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

if min >a[i] then min :=a[i];

end;

writeln('so lon nhat la:',max);

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

readln

end.

uses crt;

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

i,min:integer;

begin

clrscr;

for i:=1 to 10 do

  begin

write('A[',i,']='); readln(a[i]);

end;

min:=a[1];

for i:=1 to n do

  if min>a[i] then min:=a[i];

writeln(min);

readln;

end.