viết chương trình nhập điểm toán điểm văn điểm anh nếu tổng điểm lớn hơn bằng 24 thì đưa ra thông báo 'đã trúng tuyển ' ngược lại đưa ra thông báo ' không trúng tuyển '

2 câu trả lời

program az;

uses Crt;

var a,b,c,T : real;

begin

clrscr;

Write('Nhap diem mon Toan : '); readln(a);

Write('Nhap diem mon Van : '); readln(b);

Write('Nhap diem mon Anh  : '); readln(c);

T := a + b + c;

If (T >= 24) then Write('Da trung tuyen ') else Write('Khong trung tuyen');

readln

end.

uses crt;
var a,b,c,T : real;
begin
clrscr;
write('Nhap diem mon Toan: ');
readln(a);
write('Nhap diem mon Van: ');
readln(b);
write('Nhap diem mon Anh: ');
readln(c);
t := a + b + c;
if (t >= 24) then writeln('Da trung tuyen ') else writeln('Khong trung tuyen');
readln;
end.

Câu hỏi trong lớp Xem thêm