Phát hiện và sửa lỗi sai (nếu có) trong chương trình Pascal sau? ----- Nội dung dịch tự động từ ảnh ----- program Mau_1; var n, T, S: integer; begin writeln ('Nhap n: '); readln (n); if n>-2 then begin S:-n; T: 2*S; end; else begin S:= 0; T:= 0; end; writeln ('So S la: ', T); readln; end.
