Viết chương trình : tính độ tuổi trung bình của các bệnh nhân mắc covid 19 Giúp mik vs đang cần gấp ạ❤️
1 câu trả lời
Program bt;
Uses crt;
Var a:array[1..100] of byte;
S,i,n:word;
tb:real;
Begin
Clrscr;
t:=0;Write('Nhap so luong benh nhan: ');readln(n);
For i:=0 to n do
Begin
Write('Nhap tuoi cua benh nhan thu ',i,': ');
readln(a[i]);S:=t+a[i];
End;
tb:=S/n;
Write('Do tuoi trung binh cua cac benh nhan mac Covid-19 la: ',tb:8:0);
Readln;
End.
Câu hỏi trong lớp
Xem thêm
