program MaxNumber;
varinputFile, outputFile: text;a, b, c, maxNumber: integer;
beginassign(inputFile, 'input.txt');reset(inputFile);
readln(inputFile, a, b, c);
maxNumber := a;
if b > maxNumber thenmaxNumber := b;
if c > maxNumber thenmaxNumber := c;
close(inputFile);
assign(outputFile, 'output.txt');rewrite(outputFile);
writeln(outputFile, maxNumber);
close(outputFile);end.
program MaxNumber;
var
inputFile, outputFile: text;
a, b, c, maxNumber: integer;
begin
assign(inputFile, 'input.txt');
reset(inputFile);
readln(inputFile, a, b, c);
maxNumber := a;
if b > maxNumber then
maxNumber := b;
if c > maxNumber then
maxNumber := c;
close(inputFile);
assign(outputFile, 'output.txt');
rewrite(outputFile);
writeln(outputFile, maxNumber);
close(outputFile);
end.