Question

tìm giá trị lớn nhất của 1 dãy số (đề bài chỉ yêu cầu vậy thôi. Ko cho bt là trong excel,free pascal,...)
lưu ý là trình bày vào vở ghi

Answer 1

Đề không cho biết là dãy số được nhập từ bàn phím, có bao nhiêu phần tử hay giới hạn của dãy số... nên không thể dùng pascal được nhé.

Có thể là làm trên excel. Bạn dùng hàm max nhé:

=max(giá trị 1, giá trị 2,...)

Answer 2

uses crt;

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

i,n,max:integer;

begin

clrscr;

write('Nhap n='); readln(n);

for i:=1 to n do 

begin

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

end;

max:=a[1];

for i:=1 to n do 

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

writeln(max);

readln;

end.