Question

Viết chương tình sử dụng biến mảng để nhập từ bàn phím họ tên(hoten);ngày sinh(NS),Điểm Toán(Dtoan);Điểm Văn (Dvan) của các bạn học sinh trong lớp em(có 45hs).In ra màn hình tổng Điểm trung bình(DTB) của các bạn trong lớp.

Làm hộ mình với ạ,ngày mai mình thi rồi

Answer 1

uses crt;
var NS:array[1..100] of integer; Dtoan,Dvan,Dtb:array[1..100] of real;
hoten:array[1..100] of string; i:byte;
begin
clrscr;
for i:=1 to 45 do
begin
write('Nhap ten cua hoc sinh thu',i,':'); readln(hoten[i]);
write('Nhap ngay sinh:'); readln(NS[i]);
write('Nhap diem toan:'); readln(Dtoan[i]);
write ('Nhap diem van:'); readln(Dvan[i]);
Dtb[i]:=(Dtoan[i]+Dvan[i])/2;
end;
writeln('Diem trung binh cua cac ban trong lop la:');
for i:=1 to 45 do
writeln(hoten[i],':',Dtb[i]:1:2);
readln;
end.
Tham khảo thui!

Answer 2

jvgjvjvg

Answer 3

vjgjvjvjgjv

Answer 4

jffgnhnđxdhndyy

Answer 5

rxrtxdtydrymjxdjxrdxd

Answer 6

ệtrtesethhretsettẻt

Answer 7

ehtrethetesyu

Answer 8

77dr7656567858ufu

Answer 9

ủuuffjhfujfjjt

Answer 10

utyfu657kdjn6

Answer 11

dtsbtsetybkejtm io49pa25ub8a90a90a90a90a90a90a90a90a90a90a90a902uka5980ukawgvb