Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài

Những câu hỏi liên quan
Trịnh Uyển Nhi
Xem chi tiết
15 Nguyễn Hoàng gia huy
Xem chi tiết
Nguyễn Lê Phước Thịnh
28 tháng 2 2022 lúc 18:48

uses crt;

var a:array[1..100]of real;

i,n,dem1,dem2,dem3,dem4:integer;

begin

clrscr;

readln(n);

for i:=1 to n do readln(a[i]);

dem1:=0;

dem2:=0;

dem3:=0;

dem4:=0;

for i:=1 to n do 

  begin

 if (a[i]>=8) then inc(dem1);

if (6.5<=a[i]) and (a[i]<=7.9) then inc(dem2);

if (5<=a[i]) and (a[i]<=6.4) then inc(dem3);

if (a[i]<5) then inc(dem4);

end;

writeln('So hoc sinh gioi la: ',dem1);

writeln('So hoc sinh kha la: ',dem2);

writeln('So hoc sinh trung binh la: ',dem3);

writeln('So hoc sinh kem la: ',dem4);

readln;

end.

Tùng anh
Xem chi tiết
Tùng anh
24 tháng 4 2022 lúc 21:06

Giúp mình với nhé please 

Thế Thôi
24 tháng 4 2022 lúc 21:16

6.5 trở xuống mình cho nó kém được không á bạn

Thế Thôi
24 tháng 4 2022 lúc 21:18

a:array[1..200] of real;
begin
clrscr;
write('Nhap tong so ban trong lop:');
readln(n);
for i:=1 to n do readln(a[i]);
gioi:=0; kha:=0; kem:=0;
for i:=1 to n do
begin
if (a[i]>=8) then inc(gioi);
if (6.5<=a[i]) and (a[i]<=7.9) then inc(kha);
if (a[i]<6.5) then inc(kem);
end;
writeln('So hoc sinh gioi la:',gioi);
writeln('So hoc sinh kha la:',kha);
writeln('So hoc sinh kem la:',kem);
readln;
end.

thiện nhân
Xem chi tiết
SINH HOANG
Xem chi tiết
Ngô Bá Hùng
18 tháng 4 2023 lúc 14:18

program TimDiemCaoNhat;

var
  diem: array[1..30] of integer;
  i, diemCaoNhat, soThuTu: integer;

begin
  for i := 1 to 30 do
  begin
    write('Nhap diem cua ban thu ', i, ': ');
    readln(diem[i]);
  end;
  diemCaoNhat := diem[1];
  soThuTu := 1;
  for i := 2 to 30 do
  begin
    if diem[i] > diemCaoNhat then
    begin
      diemCaoNhat := diem[i];
      soThuTu := i;
    end;
  end;
  writeln('Diem cao nhat la: ', diemCaoNhat);
  writeln('Ban thu ', soThuTu, ' dat diem cao nhat.');
  
  readln;
end.

Trần Triệu Vy
Xem chi tiết
Lê thị Phương  anh
Xem chi tiết
Phía sau một cô gái
5 tháng 5 2023 lúc 20:45

n = int(input("Nhập số lượng học sinh trong lớp: "))

dtb = [ ]

for i in range(n):

      diem = float(input(f"Nhập điểm trung bình của học sinh thứ {i+1}: "))

      dtb.append(diem)

count = 0

for diem in dtb:

      if diem < 5:

            count += 1

print(f"Số lượng học sinh xếp loại chưa đạt là: {count}")

Nguyễn Huỳnh Mai Trân
Xem chi tiết
Nguyễn Lê Phước Thịnh
14 tháng 4 2022 lúc 22:04

uses crt;

var a:array[1..100]of real;

n,i,dem:integer;

begin

clrscr;

readln(n);

for i:=1 to n do readln(a[i]);

dem:=0;

for i:=1 to n do 

  if a[i]>=8 then dem:=dem+1;

for i:=1 to n do 

 if a[i]>=8 then write(a[i]:4:2,' ');

writeln;

writeln(dem);

readln;

end.

Đỗ vantinh
Xem chi tiết
Kiều Vũ Linh
9 tháng 5 2023 lúc 16:15

Em cho thêm điều kiện loại Khá của em là gì?