Sửa cho em đoạn code dưới kia ạ, làm theo hướng này chứ đừng chuyển sang hướng khác
Đề bài: Nhập từ bàn phím 4 số nguyên a, b, c, d. Tìm số nguyên dương lớn nhất
program tim_max; uses crt; var a,b,c,d,max:integer; begin clrscr; writeln('Nhap gia tri cua a, b, c, d: '); readln(a,b,c,d); max := a; if b>max then max := b; if c>max then max := c; if d>max then max := d; writeln('Max la: ',max); readln; end.