`\color[#094A52 ][@] \color[#0F5132][b] \color[#066839][ơ] ` ` \color[#1E5938][s]\color[#3DAC78 ][e] \color[#57CC99][n] \color[ #74C69D][t]`

$------------------------------$

Program TIM_SO_LON_NHAT;

uses crt;

Var: a, b, c, d, Max: real;

Begin

Clrscr;

Writeln('nhap bon so can tim:');

Writeln('nhap a ='); Readln(a);

Writeln('nhap b ='); Readln(b);

Writeln('nhap c ='); Readln(c);

Writeln('nhap d ='); Readln(d);

Max := a;

If Max < b then Max := b;

If Max < c then Max := c;

If Max < d then Max := d;

Writeln(' so lon nhat trong 4 so la ', Max ,');

readln;

End.