Đề: Hãy viết chương trình Pascal hoàn chỉnh nhập vào điểm thi 1 lớp. Sau đó tính điểm trung bình của cả lớp. Tìm điểm thi cao nhất rồi in kết quả ra màn hình. Biết điểm thi, số lượng học sinh của lớp được nhập từ bàn phím.
Giúp mình với ạ.
em hãy hoàn thành chương trình thông báo kết quả kì thi nghề phổ thông như sau: nhập vào họ tên thí sinh(ht), lớp (l), điểm thi lý thuyết (dlt), điểm thi thực hành (dth). sau đó tính điểm trung bình (dtb) của 2 phần thi đó: nếu dtb >=8 hoàn thành xuất sắc, dtb>=6.5 hoàn thành tốt, các trường hợp còn lại là hoàn thành. trong đó:+ điểm thực hành được làm tròn thành số nguyên dương +điểm trung bình bằng trung bình cộng của điểm lý thuyết và điểm thực hành + thông báo kết quả của thí sinh gồm: họ và tên, lớp, kết quả
Viết chương trình nhập điểm trung bình môn tin học cuối hk1 của các bạn hc sinh trong lớp em và in ra số điểm cao nhất?
GIÚP EM VỚI Ạ ! MAI EM THI RỒI
Nếu chưa học câu lệnh này thì rep lại cho mình để mình dùng mấy câu lệnh đã học từ b8 trở về trước nhá! Good luck for you :D
uses crt;
var a:array[1..50]of real;
max:real;
i,n:integer;
begin
clrscr;
write('Nhap n='); readln(n);
for i:=1 to n do
begin
write('Nhap diem cua ban thu ',i,'='); readln(a[i]);
end;
max:=a[1];
for i:=1 to n do
if max<a[i] then max:=a[i];
writeln(max);
readln;
end.
viết chương trình nhập điểm thi 2 môn ngữ văn và toán của các học sinh khối 9 tính điểm trung bình và in ra màn hình kết quả thi đậu nếu điểm trung bình lớn hơn hoặc bằng 5 còn thi trượt nếu như điểm trung bình bé hơn 5
program DiemTB;
var
diemToan, diemVan, diemTB: real;
begin
write('Nhap diem mon Toan: ');
readln(diemToan);
write('Nhap diem mon Van: ');
readln(diemVan);
diemTB := (diemToan + diemVan) / 2;
writeln('Diem trung binh: ', diemTB:0:2);
if diemTB >= 5 then
writeln('Chuc mung! Ban da dau ky thi.')
else
writeln('Rat tiec! Ban da truot ky thi.');
readln;
end.
Viết chương trình nhập điểm tuyển sinh lớp 10, cho phép nhập vào 3 môn
Văn, Toán, Anh. Sau đó in ra điểm tổng kết (điểm tổng kết được tính như sau:
diemtongket= Văn*2 + Toán*2 + Anh) và thông báo kết quả thi của học sinh như
sau: Nếu điểm tổng kết >=38 thì thông báo “Chuc mung ban da thi dau tuyen
sinh!”, ngược lại thì thông báo “Ban da thi rot, chuc may man lan sau!”
#include <bits/stdc++.h>
using namespace std;
double a,b,c,tb;
int main()
{
cin>>a>>b>>c;
tb=(a+b)*2+c;
if (tb>=38) cout<<"Chuc man ban da thi dau tuyen sinh";
else cout<<"Ban da thi rot, chuc may man lan sau";
return 0;
}
hãy hoàn thành chương trình phổ thông kết quả kì thi nghề phổ thông như sau:Nhập vào và in ra họ và tên(HT)lớp(L) điểm thi lý thuyết(ĐLT) điểm thi thực hành(ĐTH) sau đó tính điểm trung bình(ĐTB) của 2 phần thì đónếu điểm trung bình lớn hơn 5 thì thông báo thi đậu và ngược lại bạn thì lại
Viết chương trình sử dụng biến mảng để nhập điểm trung bình môn tin học của các bạn trong lớp em.Thực hiện các yêu cầu sau - in điểm của các banh trong lớp em ra màn hình -tìm bạn có điểm trung bình cao nhất lớp em
uses crt;
var a:array[1..100]of real;
i,n:integer;
ln:real;
begin
clrscr;
readln(n);
for i:=1 to n do readln(a[i]);
for i:=1 to n do writeln(a[i]);
ln:=a[1];
for i:=1 to n do if ln<a[i] then ln:=a[i];
writeln(ln);
readln;
end.
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.
Điểm trung bình cả năm của mỗi học sinh trong lớp là một số thực em hãy viết chương trình để nhập vào danh sách điểm trung bình cả năm của các bạn trong lớp sau đó thông báo kết quả có bao nhiêu bạn xếp loại chưa đạt ( biết rằng nếu điểm trung bình cả năm nhỏ hơn 5 thì xếp loại chưa đạt)
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}")
Viết chương trình nhập trung bình môn Tin học của các bạn học sinh trong lớp. In ra màn hình điểm của các bạn và điểm số lớn nhất (hoặc nhỏ nhất) của lớp.
refer
uses crt;
var i,n:longint;
a:array[1..100] of real;
s1,s,max,min:real;
begin
clrscr;
write('Nhap n: '); readln(n);
for i:=1 to n do
begin
write('Diem trung binh mon tin hoc cua ban thu ',i,' la: ');readln(a[i]);
end;
min:=a[1];max:=a[1];
for i:=2 to n do begin
if a[i]>max then max:=a[i];
if a[i]<min then min:=a[i]; end;
for i:=1 to n do
s:=s+a[i];
s1:=s/n;
writeln('So diem cao nhat la: ',max);
writeln('So diem thap nhat la: ',min);
write('Diem TB cua ca lop la: ',s1:0:1);
readln