Câu hỏi của Nhật Nguyễn

Question

Bài: viết câu lệnh:

A) Khai báo dãy số lưu điểm trung bình của 50 học sinh lớp 8A sau đó xuất ra màn hình.

B) khai báo dãy số lưu chiều cao của 50 học sinh lớp 8B sau đó xuất...

Đời về cơ bản là buồn...... · Accepted Answer

a)

program Diem_trung_binh;

uses crt;

var i, n: integer;

giatriTB: real;

A: array[1..100] of real;

begin

clrscr;

write('Nhap so hoc sinh lop 8A: ');

readln(n);

writeln('Nhap diem cua moi ban:');

for i:=1 to n do

begin

write('a[',i,']='); readln(a[i]);

giatriTB:=giatriTB+a[i]

end;

giatriTB:=giatriTB/n;

writeln('Diem trung binh cua 50 hoc sinh lop 8A la: ', giatriTB:3:2);

readln

end.Câu trả lời: a)

program Diem_trung_binh;

uses crt;

var i, n: integer;

giatriTB: real;

A: array[1..100] of real;

begin

clrscr;

write('Nhap so hoc sinh lop 8A: ');

readln(n);

writeln('Nhap diem cua moi ban:');

for i:=1 to n do

begin

write('a[',i,']='); readln(a[i]);

giatriTB:=giatriTB+a[i]

end;

giatriTB:=giatriTB/n;

writeln('Diem trung binh cua 50 hoc sinh lop 8A la: ', giatriTB:3:2);

readln

end.

Bài 9. Làm việc với dãy số