*pascal free -bài tập: +tính điểm trung bình 3 môn Toán, Văn, Anh của 33 học sinh BÀI LÀM VIỆC VỚI DÃY SỐ Giúp mình với, cảm ơn nhiều ạ

vuvanvuong06112001

2 năm trước

Loga Sinh Học lớp 12

0 lượt thích 26 xem

1 trả lời

Thích Trả lời

trantoanjr123

uses crt;

var i:integer;

tong,toan,van,anh: array[1..33] of integer;

tb: array [1..33] of real;

begin

clrscr;

writeln('Nhap diem 3 mon toan, van, anh cua 33 hoc sinh:');

for i:= 1 to 33 do

begin

tong[i]:=0;

writeln('Nhap diem cua hoc sinh thu ',i);

write('Toan: ');readln(toan[i]);

write('Van: ');readln(van[i]);

write('Anh: ');readln(anh[i]);

tong[i]:= toan[i] + van[i] + anh[i];

tb[i]:=tong[i]/3

end;

writeln('Diem trung binh 3 mon cua 33 hoc sinh la:');

for i:= 1 to 33 do writeln('Diem trung binh cua hoc sinh thu ',i,' la: ',tb[i]:0:2);

readln;

end.

Vote (0) Phản hồi (0) 2 năm trước

qc88878

program diemtb;

uses crt;

var DTB:array [1..33] of real;

T,V,A,:array [1..33] of integer;

i:integer;

begin clrscr;

write('Nhap diem 3 mon Van, Toan, Anh moi HS: ');

for i:=1 to 33 do

begin

writeln('Nhap diem cua HS thu ',i);

write('Toan, Van, Anh: ');readln(T[i], V[i], A[i]);

DTB[i]:= (T[i] +V[i] +A[i])/3;

end;

write('DTB[',i,']');readln(DTB[i]);

for i:=1 to 33 do

write('Diem TB 3 mon Van, Toan, Anh cua HS ',i,' la: 'DTB[i]:0:3);

readln;

end.

Học tốt!

Vote (0) Phản hồi (0) 2 năm trước

Các câu hỏi liên quan

cho tam giác ABC có 3 góc nhọn nội tiếp đường tròn (o) . 2 đường cao AM,BN cắt nhau tại H ( H thuộc BC),(N thuộc AC). a,CM tứ giác ABMN nôi tiếp b) Tia AO cắt đường tròn (o) tại K ( K khác A). CM tứ giác BMCK là hình bình hành giúp mk vs ạ cần giải gấp ạ hứa vote 5s

Câu 1 .Trên nửa mặt phẳng bờ là đường thẳng xy đi qua điểm O .Vẽ tia 0a,0b sao cho góc a0x=150°và góc b0y=60° a, tính góc a0y Câu 2 .Trên cùng 1 nửa mặt phẳng bờ chứa tia Oy vã tia 0x và 0d sao cho góc x0c=63°,x0d=126° a, ba tia 0x,0c,0d tia nào nằm giữa 2 tia còn lại .Vì sao? b, tính góc c0d c, tia 0c có phải tia phân giác của góc x0d k .Vì sao ? Ac giải và vẽ hình hộ em đc k ạ 🙆‍♀️em cảm ơn

ai đó làm ơn giúp với em ngu anh lắm

Kể tên một số quyền cơ bản của công dân được quy định trong hiến pháp mà em đã học

một thửa ruộng hình thang có độ dài hai đáy lần lượt là 36m và 28m,chiều cao của thửa ruộng bằng trung bình cộng hai đấy. trên thửa ruộng đó cứ 10m2 người ta thu hoạch được 60kg ngô . Hỏi trên thửa ruộng đó người ta thu hoạch được bao nhiêu tấn ngô

tại sao CU2O gọi là đồng (l)oxit còn CUO gọi là đồng (ll)oxit

chọn đáp án đúng Ở nhiệt độ quá cao (hơn 40oC ) hoặc quá thấp (dưới 0oC) các hoạt động của hầu hết các loài cây xanh diễn ra như thế nào ? a) các hạt diệp lục được hình thành nhiều b) quang hợp giảm, hô hấp tăng c)quang hợp và hô hấp tăng d)quang hợp và hô hấp ngưng trệ câu 2 đặc điểm hình thái của cây ưa bóng là a) thân cao ,lá nhỏ, màu lá nhạt b)thân nhỏ,lá to màu lá sẫm c)lá to,màu sẫm d) thân to ,lá nhỏ ,màu lá nhạt câu 3 giao phối gần hoặc tự thụ phấn lặp lại nhiều lần dẫn tới thoái hóa giống là do a)tăng cường thể đồng hợp lặn gây hại b) dẫn tới hiện tượng đột biến gen c) tạo ưu thế lai ở thế hệ sau d) tập trung các gen trội có hại ở thế hệ sau

Ai giải giúp em với , em cần gấpp

Khi dùng 1 ròng rọc động và ròng rọc cố định kéo một vật có trong lượng 150 vậy lúc cần để kéo vật lên là bao nhiêu niutơn

cho tam giác ABC vuông tại A , trên AC lấy điểm M , vẽ đường tròn đường kính MC , kẻ BM cắt đường tròn đó ở D , đường thẳng DA cắt đường tròn tại S a, tứ giác ABCD nội tiếp b, góc ABD = góc ACD c, chứng minh CA là tia phân giác góc SCD

Loga.vn - Cộng Đồng Luyện Thi Trực Tuyến