program TimGTLN;

var
input_file, output_file: text;
a, b, max: integer;

begin
// Mở tệp đầu vào để đọc giá trị a và b
assign(input_file, 'GTLN.txt');
reset(input_file);

// Đọc giá trị a và b từ tệp đầu vào
readln(input_file, a);
readln(input_file, b);

// Tìm giá trị lớn nhất của a và b
if a > b then
max := a
else
max := b;

// Mở tệp đầu ra để xuất kết quả
assign(output_file, 'kq_GTLN.txt');
rewrite(output_file);

// Xuất giá trị lớn nhất vào tệp đầu ra
writeln(output_file, max);

// Đóng các tệp đã mở
close(input_file);
close(output_file);
end.