Tính điểm trung bình môn tin học Hk1,với điểm KTTX1,điểm KTTX2,điểm KTTX3, điểm KTGK và điểm Thi được nhập từ bàn phím. Yêu cầu: - Xác định bài toán (Input và Output) - Mô tả thuật toán bằng sơ đồ khối - Viết chương trình trên Pascal Cần gấp mọi người ơi

input điểm KTTX1,KTTX2,KTTX3 và  điểm KTGK

output điểm trung bình môn

b1 nhập điểm KTTX1,KTTX2,KTTX3 và  điểm KTGK

b2 

diemtb←$\frac{(KTTX1+KTTX2+KTTX3+KTGK)}{4}$ 

b3 xuất diemtbm

uses crt;

var kttx1,kttx2,kttx3,ktgk,diemtbm:real;

begin

clrscr;

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

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

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

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

diemtbm:=(kttx1+kttx2+kttx3+ktgk)/4;

writeln('diem trung binh mon: ',diemtbm:5:2);

readln;

end.

`khoadang09`