Cho tệp INPUT.INP có chứa 3 nguyên tố a,b,c. Viết chương trình đọc dữ liệu từ tệp INPUT.INP và ghi vào tệp OUTPUT. OUT số lớn nhất của 3 số nguyên này
1 câu trả lời
program lon_nhat;
var f,g:text;
a,b,c,max:integer;
begin
Assign(f,'INPUT.INP'); reset(f);
Assign(g,'OUTPUT.OUT'); rewrite(g);
readln(f,a,b,c);
max:=a;
if b>max then max:=b;
if c>max then max:=c;
write(g,max);
close(f); close(g);
end.
