Question

viet chuong trinh cho phep nhap diem kiem tra 1 ban nao do va in ra man hinh ket qua: neu diem nho hon 5 thi ban can co gang hon. neu ban lon hon hoac =5 va nho hon 6,5 thi ban dat diem trung binh. neu diem lon hon hoac = 6,5 va nho hon 8 thi ban dat diem kha. neu diem lon hon hoac = 8 thi ban dat diem gioi

Answer 1

uses crt;

var diem:real;

begin

clrscr;

write('nhap diem:'); readln(diem);

if diem<5 then writeln('ban can co gang hon');

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

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

if diem>=8 then writeln('ban dat diem gioi');

readln;

end.