Viết CT nhập vào điểm thi phần lý thuyết và thực hành môn nghề Tin học văn phòng. Hãy đưa ra màn hình thông báo kết quả ĐẠT hay KHÔNG ĐẠT? (ĐẠT nếu điểm tổng từ 8 trở lên).

1 câu trả lời

uses crt;

var a, b, t : real;

begin

clrscr;

write('nhap diem li thuyet : ');readln(a);

write('nhap diem thuc hanh : ');readln(b);

t := a + b;

if t >= 8 then writeln('Dat') else writeln('Khong dat');

readln

end.

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