Viết chương trình pascal nhập điểm Toán Văn Anh. tính và thông báo là màn hình điểm trung bình các môn

Question

thanhthuy · Answer

program DTB;

uses crt;

var toan, anh, van, TB: real;

Begin

write(‘Nhap diem toan: ‘); readln(toan);

write(‘Nhap diem van: ‘); readln(van);

write(‘Nhap diem anh: ‘); readln(anh);

TB:=(toan+van+anh)/3;

write(‘TB=’,TB:2:2);

readln

End.

tuyetnhung · Answer

uses crt;

var a,b,c:real;

BEGIN

clrscr;

write(‘Nhap diem Toan:’); readln(a);

write(‘Nhap diem Van:’); readln(b);

write(‘Nhap diem Anh:’); readln(c);

write(‘Diem trung binh cac mon:’,(a+b+c)/3:0:2);

readln

END.

Chúc bạn học tốt!

Trả lời