Viết chương trình nhập từ bàn phím điểm môn tiếng Anh và môn Vật lý của n học sinh tính trung bình cộng môn tiếng Anh và môn lý của cả lớp
Những câu hỏi liên quan
Nhập danh sách lớp có N học sinh và điểm 3 môn Toán, Lý, Tin từ bàn phím. in bảng điểm lớp có điểm trung bình từng môn và điểm trung bình 3 môn của từng bạn
Program HOC24;
var Toan,Ly,Tin,TBMToan,TBMLy,TBMTin: real;
i,n: byte;
begin
write('Nhap so ban hoc sinh trong lop: '); readln(n);
for i:=1 to n do
begin
write('Nhap diem Toan; Ly; Tin cua ban thu ',i,': ');
readln(Toan[i],Ly[i],Tin[i]);
end;
TBMToan:=0; TBMLy:=0; TBMTin:=0;
For i:=1 to n do
begin
TBMToan:=TBMToan+Toan[i];
TBMLy:=TBMLy+Ly[i];
TBMTin:=TBMTin+Tin[i];
end;
writeln('Diem trung binh mon Toan la: ',TBMToan:5:1);
writeln('Diem trung binh mon Ly la: ',TBMLy:5:1);
writeln('Diem trung binh mon Tin la: ',TBMTin:5:1);
For i:=1 to n do
writeln('Diem trung binh 3 mon cua ban thu ',i,' la: ',TBMToan+TBMLy+TBMTin:5:1);
Readln
end.
Đúng 0
Bình luận (0)
Viết chương trình sử dụng chương trình con để tính điểm trung bình 3 môn Toán Văn Anh của năm bạn học sinh biết điểm từng bạn được nhập từ bàn phím
uses crt;
var a,b,c,tb:array[1..100]of real;
i,n:integer;
begin
clrscr;
n:=5;
for i:=1 to n do
begin
readln(a[i],b[i],c[i]);
end;
for i:=1 to n do
tb[i]:=(a[i]+b[i]+c[i])/3;
for i:=1 to n do
writeln('Diem trung binh cua ban thu ',i,' la: ',tb[i]:4:2);
readln;
end.
Đúng 0
Bình luận (0)
Viết chương trình nhập vào điểm 2 môn Toán, Văn từ bàn phím. Điểm Anh văn được gán bằng 8.0 điểm. Sau đó tính tổng điểm, điểm trung bình cộng 3 môn học trên và đưa kết quả ra màn hình. (Điểm trung bình cộng lấy 1 số thập phân.) lẹ cho mình nha cảm mưn mn.
Viết chương trình nhập từ bàn phím họ và tên, điểm trung bình của từng môn của một học sinh a) Tính điểm trung bình môn b) Đưa ra màn hình điểm của môn cao nhất c) Đưa ra màn hình những điểm trung bình lớn hơn hoặc bằng 5 d) Đưa ra màn hình những môn có điểm trung bình bằng 10 e) sắp xếp theo thứ tự tăng dần của điểm trung bình
VCT tính điểm trung bình cộng 3 môn học Toán, Ngữ văn, Tiếng Anh (điểm các môn nhập từ bàn phím, đều tính hệ số 1, điểm trung bình làm tròn 1 chữ số thập phân) về kết quả xếp loại được quy định như sau:
+ Loại Giỏi: ĐTB8.0 và không có môn nào dưới 6.5
+ Loại Khá: 6.5ĐTB8.0 và không có môn nào dưới 5.0
+ Loại Trung bình: 5.0ĐTB6.5 và không có môn nào dưới 3.5
+ Loại Yếu: còn lại
Đầu vào: Điểm 3 môn Toán, Ngữ văn, Tiếng Anh cách nhau một khoảng trắng
Đầu ra: ĐTB và kết quả Gioi hoặc Kha hoặ...
Đọc tiếp
VCT tính điểm trung bình cộng 3 môn học Toán, Ngữ văn, Tiếng Anh (điểm các môn nhập từ bàn phím, đều tính hệ số 1, điểm trung bình làm tròn 1 chữ số thập phân) về kết quả xếp loại được quy định như sau:
+ Loại Giỏi: ĐTB>=8.0 và không có môn nào dưới 6.5
+ Loại Khá: 6.5<=ĐTB<8.0 và không có môn nào dưới 5.0
+ Loại Trung bình: 5.0<=ĐTB<6.5 và không có môn nào dưới 3.5
+ Loại Yếu: còn lại
Đầu vào: Điểm 3 môn Toán, Ngữ văn, Tiếng Anh cách nhau một khoảng trắng
Đầu ra: ĐTB và kết quả Gioi hoặc Kha hoặc Trung binh hoặc Yeu
Viết chương trình nhập từ bàn phím họ và tên, điểm trung bình của từng môn của một học sinh a) Tính điểm trung bình môn b) Đưa ra màn hình điểm của môn cao nhất c) Đưa ra màn hình những điểm trung bình lớn hơn hoặc bằng 5 d) Đưa ra màn hình những môn có điểm trung bình bằng 10 e) sắp xếp theo thứ tự tăng dần của điểm trung bình
viết chương trình tính trung bình cộng của n số tự nhiên đầu tiên (với n nhập từ bàn phím) lớp 8 môn tin
viết chương trình nhập điểm kiểm tra học kì I môn tin học cho n học sinh (với n và điểm được nhập từ bàn phím ) và in ra các kết quả sau: A: tổng điểm của lớp B:Điểm trung bình của lớp C:điểm cao nhất D:số học sinh đạt trung bình trở lên Lưu ý: Sử dụng biến đếm : For := to đó; Sử dụng biến mảng: var :array[..] of integer;
viết chương trình nhập điểm 3 môn toán,ngữ văn, tiếng Anh của các bạn trong lớp , sau đó in ra màn hình điểm trung bình của phần toán , văn , tiếng Anh của cả lớp
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);
writeln('Diem trung binh la: ',(a+b+c)/3:4:2);
readln;
end.
Đúng 1
Bình luận (0)