uses crt;
var n,i:integer;
a:array[1..100]of real;
begin
clrscr;
write('Nhap so hoc sinh:'); readln(n);
for i:=1 to n do
begin
write('Nhap diem cua hoc sinh thu ',i,'='); readln(a[i]);
end;
for i:=1 to n do
write(a[i]:4:1,' ');
readln;
end.
viết chương trình nhập vào điểm kiểm tra môn tin học của các học sinh trong lớp (k học sinh). in ra màn hình điểm số cao nhất.
input: điểm của k học sinh
output: điểm số cao nhất
Viết chương trình nhập điểm kiểm tra học kì 1 môn tin, cho n học sinh và in ra màn hình với n và điểm kiểm tra được nhập từ bàn phím (sử dụng biến mảng)
Viết chương trình gồm 6 phần tử các phần tử được nhập từ bàn phím là điểm trung bình môn tin:
A) In ra màn hình các điểm trung bình trên 6,5?
B) Có bao nhiêu học sinh được ít hơn 5 điểm?
1)viết chương trình nhập vào mảng Diem (lưu điểm kiểm tra giữa HKII của lớp) với n phần tử được nhập từ bàn phím)
in ra mảng đó và tính trung bình cộng điểm giữa HKII của lớp đó và in ra các điểm nhỏ hơn 6,5
2) viết chương trình nhập mảng Diem (lưu điểm kiểm tra giữa HKII của 1 lớp)
in ra điểm cao nhất và vị trí của giá trị đó. Sau đó tính tổng của mảng đó.
Viết chương trình nhập tên và điểm của n học sinh in ra màn hình tên và điểm của học sinh cao nhất
Viết chương trình nhập mảng gồm N số nguyên từ bàn phím và in ra màn hình các dãy số vừa nhập đó
Viết chương trình nhập n số nguyên từ bàn phím. In ra màn hình các số vừa nhập và đếm xem trong n số đó có bao nhiêu số lớn hơn 10 và nhỏ hơn 20
Mọi người giúp em bài này với ạ, em mới biết làm chỗ in ra màn hình các số vừa nhập thôi ạ!
Viết chương trình nhập N số thực vào từ bàn phím, in ra màn hình giá trị nhỏ nhất và tích các giá trị của N số đã nhập vào.
a) Viết chương tình nhập vào từ bàn phím mảng A gồm n số nguyên.In ra màn hình số nguyên lớn nhất
b) Viết chương trình nhập vào từ bàn phím mảng B gồm n số nguyên.In ra màn hình số nguyên bé nhất
