Question

[Phuc Nguyen]

Viết chương trình Pascal nhập điểm kiểm tra rồi thực hiện:

- Nếu điểm bé hơn 5, in ra dòng chữ: "Ban can co gang hon!"

- Nếu điểm lớn hơn hoặc bằng 5 và bé hơn 6.5, in ra dòng chữ: "Ban dat diem trung binh!"

- Nếu điểm lớn hơn hoặc bằng 6.5 và bé hơn 8, in ra dòng chữ: "Ban dat diem kha!"

- Nếu điểm lớn hơn 8, in ra dòng chữ: "Chuc mung, ban dat diem gioi!"

Answer 1

[Ái Ngân]

var a:real;

begin

write('nhap diem kiem tra: '); readln(a);

if a<5 then writeln('Ban can co gang hon!');

if (a>=5) and (a<6.5) then writeln('Ban dat diem trung binh!');

if (a>=6.5) and (a<8) then writeln('Ban dat diem kha!');

if a>8 then write('Chuc mung,ban dat diem gioi!');

readln

end.