Question

viết chương trình nhập vào điểm kiểm tra môn tin học của các học sinh trong lớp (k học sinh). in ra màn hình điểm số cao nhất.

input: điểm của k học sinh

output: điểm số cao nhất

Answer 1

uses crt;

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

i,n:integer;

ln:real;

begin

clrscr;

readln(n);

for i:=1 to n do readln(a[i]);

ln:=0;

for i:=1 to n do if ln<a[i] then ln:=a[i];

writeln(ln:4:2);

readln;

end.