Question

Xổ số miên mà viết chương trình nhập điểm môn thể dục của các bạn trong lớp sau đó in ra màn hình kết quả học tập loại đạt, chưa đạt ( theo tiêu chuẩn quy đổi :loại đạt ≥5 điểm ;loại chưa đạt <5 điểm )?

Answer 1

program b1;
uses crt;
var i,n,dat,chuadat:integer;
a:array[1..100] of integer;
begin
clrscr;
write('Nhap tong so ban trong lop:');
readln(n);
for i:=1 to n do  readln(a[i]);
dat:=0; chuadat:=0;
for i:=1 to n do
begin
if (a[i]>=5) then inc(dat);
if (5>=a[i]) then inc(chuadat);
end;
writeln('So hoc sinh dat la:',dat);
writeln('So hoc sinh chuadat la:',chuadat);
readln;
end.

Tham khao!

Answer 2

Phần xổ số miên là mình viết nhầm

Nó là: xử dụng biến mảng nha