var
a,b:array[1..100] of integer;
i,n,m,k:interger;
begin
readln(n);write('nhap diem tb');readln(m);
for i:=1 to n do readln(a[i]);
for i:=1 to n do
if a[i]>m then d:=d+1;
write('co',d,'ban hon so diem tb');k:=1
readln
end.
var
a,b:array[1..100] of integer;
i,n,m,k:interger;
begin
readln(n);write('nhap diem tb');readln(m);
for i:=1 to n do readln(a[i]);
for i:=1 to n do
if a[i]>m then d:=d+1;
write('co',d,'ban hon so diem tb');k:=1
readln
end.
Viết chương trình nhập vào điểm trung bình của một học sinh và phân loại học sinh theo tiêu chuẩn sau:
9≤ Điểm TB Loại A7≤ Điểm TB < 9 Loại B5≤ Điểm TB < 7 Loại CĐiểm TB < 5 Loại DInputGồm số số thực TB(0<=TB<=10) �� (0≤��≤1OutputGhi ra một trong các kí tự thộc tập {A, B, C, D}.Sample InputCopy7.5Sample OutputCopy8a, Viết chương trình nhập vào số nguyên dương, tính N!=1*2*3*...*N
VD N=5 thì in ra 5!=120
b, Viết chương trình tính tổng số chẵn từ 1 đến N với N là số nguyên sau đó hiển thị ra tông
VD N=10 thì tổng số chẵn là 30
c, Viết chương trình nhập vào của một số nguyên dương N, kiểm tra xem có phải số nguyên tố
Viết chương trình nhập vào 3 số a, b, c. Kiểm tra chúng có phải là bộ số pitago hay không?
Viết chương trình nhập vào 3 số a, b, c. Kiểm tra chúng có phải là độ dài 3 cạnh của một tam giác không? Nếu có hãy tính chu vi và diện tích tam giác ấy.
Viết chương trình nhập vào một số nguyên và kiểm tra xem số vừa nhập là số chẵn hay lẻ. (Sử dụng câu lệnh If … then … else ….)
Viết chương trình nhập vào một số nguyên và kiểm tra xem số vừa nhập là số chẵn hay số lẻ. (Sử dụng câu lệnh If … then dạng thiếu)
viết chương trình nhập một dãy A gồm N số nguyên. Hãy cho biết trong dãy đó có bao nhiêu số chia hết cho 3
viết chương trình nhập vào mang một chiều các số thực, số lượng phần tử không quá 1000. Đưa ra màn hình số lẻ cuối cùng và chỉ số của nó trong mảng bằng chương trình pascal
Bài tập:
Yêu cầu: Cho biết điểm kiểm tra Tin học của 1 em học sinh (2 con điểm hệ số 1, 1 con điểm hệ số 2, 1 con điểm hệ số 3). In ra Kết quả học tập môn Tin học của em đó. Nếu điểm tổng kết >=8 đạt kết quả Giỏi, <8 và >=6,5 đạt kết quả Khá, <6,5 và >=5 đạt kết quả Trung Bình, <5 đạt kết quả Yếu.
Dữ liệu: Một dòng chứa 4 số điểm của học sinh.
Kết quả: Kết quả học tập môn Tin học của em học sinh.
Mình không biết làm bài này ai giúp với a