Viết chương trình nhập điểm của các bạn trong lớp. Sau đó in ra màn hình số bạn đạt kết quả học tập loại giỏi, khá, trung bình và kém( theo tiêu chuẩn >8 điểm: Giỏi, từ 6,5 điểm đến 7,9 điểm: Khá, từ 5 điểm đến 6,4 điểm: Trung bình và dưới 5 điểm : Kém)
Những câu hỏi liên quan
viết chương trình nhập điểm môn tin của các bạn trong lớp mình au đó in ra màn hình sổ bạn số bạn đtaj kết quả học tập loại giỏi khá trung bình và yếu ( theo điều kiện>= 8 điểm giỏi từ 6,5 điểm đến 7,9 điểm khá từ 5 điểm đến 6,4 điểm trung bình dưới 5 điểm yếu)
sử dụng biến mảng viết chương trình nhập điểm 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 khá giỏi (theo tiêu chuẩn loại giỏi lớn hơn hoặc = 8 điểm;loại khá từ 6,5 đến dưới 8 điểm?
6.5 trở xuống mình cho nó kém được không á bạn
Đúng 0
Bình luận (0)
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.
Đúng 1
Bình luận (2)
viết chương trình nhập điểm các bạn trong lớp, sau đó in ra màn hình số bạn đạt kết quả học tập loại giỏi, khá, trung bình và kém theo tiêu chuẩn nhà trường
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 )?
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!
Đúng 1
Bình luận (0)
Phần xổ số miên là mình viết nhầm
Nó là: xử dụng biến mảng nha
Đúng 1
Bình luận (1)
Viết chương trình nhập điểm các bạn trong lớp.Sau đó in ra màn hình học sinh giỏi,khá,trung bình
Giúp mình với ạ, cần gấp.
Tham khảo
program oken;
uses crt;
var a: array [1..100] of real;
i,n,dy,dtb,dk,dg:integer;
begin
clrscr;
write('Co bao nhieu ban can nhap diem: '); readln(N);
for i:=1 to n do
begin
write('nhap diem ban thu ',i,': ');
readln(a[i]);
if a[i]<5 then
dy:=dy+1
else if a[i]<6.4 then
dtb:=dtb+1
else if a[i]<7.9 then
dk:=dk+1
else
dg:=dg+1;
end;
writeln('So ban hoc yeu: ',dy);
writeln('So ban hoc trung binh: ',dtb);
writeln('So ban hoc kha: ',dk);
writeln('so ban hoc gioi: ',dg);
readln;
end.
Đúng 2
Bình luận (0)
program Phanloai;
uses crt;
Var i, n, Gioi, Kha, Trungbinh, Kem: integer;
A: array[1..100] of real;
Begin
clrscr;
write('Nhap so cac ban trong lop, n = '); readln(n);
writeln('Nhap diem:');
For i:=1 to n do Begin write(i,'.'); readln(a[i]); End;
Gioi:=0; Kha:=0; Trungbinh:=0; Kem:=0;
for i:=1 to n do
begin
if a[i]>=8.0 then Gioi:=Gioi+1;
if a[i]<5 then Kem:=Kem+1;
if (a[i]<8.0) and (a[i]>=6.5) then Kha:=Kha+1;
if (a[i]>=5) and (a[i]<6.5) then Trungbinh:=trungbinh+1
end;
writeln('Ket qua hoc tap:');
writeln(Gioi,' ban hoc gioi');
writeln(Kha,' ban hoc kha');
writeln(Trungbinh,' ban hoc trung binh');
writeln(Kem,' ban hoc kem');
readln
End.
Đúng 0
Bình luận (0)
Viết chương trình nhập điểm toán, lí, hóa cho các bạn lớp 8a14. Sao đó in ra màn hình điểm trung bình của các bạn trong lớp theo công thức điểm trung bình= ( điểm toán+ điểm lí+ điểm hóa):3 và in ra màn hình kết quả
uses crt;
var a,b,c,tb:array[1..10]of real;
ln,nn:real;
n:integer;
i:integer;
begin
clrscr;
readln(n);
for i:=1 to n do readln(a[i],b[i],c[i]);
for i:=1 to n do
tb[i]:=(a[i]+b[i]+c[i])/3;
for i:=1 to n do
writeln(tb[i]:4:2);
readln;
end.
Đúng 0
Bình luận (0)
viết chương trình nhập vào điểm trung bình của n học sinh trong lớp. đếm có bao nhiêu bạn đạt loại giỏi ( điểm trung bình lớn hơn hoặc bằng 8 )( loại khá điểm trung bình lớn hơn 7 và bé hơn 8, loại trung bình lớn hơn hoặc bằng 5 và bé hơn 7
Viết chương trình nhập điểm trung bình(dtb) từ bàn phím , nếu dtb > 8 thì xếp loại giỏi , ngược lại nếu 6.5 < dtb < 7.9 thì xếp loại khá , ngược lại nếu 5.0 < dtb < 6.4 thì xếp loại trung bình , ngược lại xếp loại yếu .In kết quả ra màn hình
Mình viết ở ngôn ngữ c++ nhé:
#include<iostream>
using namespace std;
int main() {
double a;
cout << "Diem trung binh : "; cin >> a;
if (a >= 1 && a <= 10) {
if (a >= 8) {
cout << "Gioi";
} else if (a >= 6.5 && a <= 7.9) {
cout << "kha";
} else if (a <= 6.4 && a >= 5) {
cout << "trung binh";
} else {
cout << "yeu";
}
} else {
cout << "Diem so khong hop le";
}
return 0;
}
Đúng 0
Bình luận (0)
Hãy viết chương trình nhập điểm chương trình của 1 bạn học sinh trong lớp. Và đưa ra xếp loại học lực của ban đó.
Cho biết:
TB > 8,0 : giỏi
6,5 < TB < 8,0 : khá
5,0 < TB < 6,5 : trung bình
3,5 < TB < 5,0 : yếu
còn lại : kém
Giải thích: TB: Điểm trung bình của học sinh
Uses CRT;
Var TB : real;
BEGIN
clrscr;
repeat
begin
write('Moi ban nhap diem trung binh: ');
Readln(TB);
end;
until (TB>0) and (TB<10);
If (TB >= 8) then write('hoc luc gioi') else
If (TB>=6.5) then write('hoc luc kha') else
If (TB>5) then write('hoc luc trung binh') else
If (TB>3.5) then write('hoc luc yeu') else
write('hoc luc kem');
Readln;
END.
Đúng 0
Bình luận (0)
Uses CRT;
Var TB : real;
Begin
clrscr;
Readln(TB);
If TB >= 8 then write('hoc luc gioi') else
If 6.5<=TB<8 then write('hoc luc kha') else
If 5<=TB<6.5 then write('hoc luc trung binh') else
If 3.5<=TB<5 then write('hoc luc yeu') else
write('hoc luc kem');
Readln;
End.
Đúng 0
Bình luận (2)
program xep_loai_hoc_luc;
uses crt;
var TB: real;
begin
clrscr;
write ('nhap diem TB: '); readln (TB);
if TB >=8.0 then writeln ('hoc luc gioi')
else if (TB >=6.5) and (TB<8) then writeln ('hoc luc kha')
else if (TB>=5.0) and (TB <6.5) then writeln('hoc luc trung binh')
else if (TB>=3.5) and (TB<5.0) then writeln('hoc luc yeu');
readln
end.
Đúng 0
Bình luận (0)
Xem thêm câu trả lời