Question

Giup mk vs

Viết chương trình nhập vào dãy số nguyên từ bàn phím. In ra màn hình giá trị nhỏ nhất của dãy số

Càng sớm càng tốt nha các bn

Cảm ơn nhìu

Answer 1

uses crt;

var n,i,min:integer;

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

begin

clrscr;

write('nhap so phan tu cua day:');readln(n);

for i:=1 to n do

begin

write('nhap a[',i,']:');readln(a[i]);

end;

min:=a[1];

for i:=1 to n do

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

write('gia tri nho nhat cua day so la:',min);

readln;

end.

Answer 2

sửa lại chổ này nhe bạn:

min:=a[1];

for i:=2 to n do

Answer 3

giup em tra lời câu hỏi nầy em đang cần gap ạ.......

cho dãy số nguyên A gồm n phân tử ( có giá trị đc nhập từ bàn phím ) dùng để lưu chiều cao của các bạn trong lớp. Viết chương trình in ra màn hình chiều cao của các bạn trong lớp... S.i.n.m là gì ạ