uses crt;
var a:array[1..100]of real;
n,i:integer;
kq:real;
begin
clrscr;
write('Nhap so ban hoc sinh:'); readln(n);
for i:=1 to n do
begin
write('Nhap can nang cua ban thu ',i,'='); readln(a[i]);
end;
kq:=0;
for i:=1 to n do
kq:=kq+a[i];
writeln('Can nang trung binh cua lop la: ',kq/n:4:2);
readln;
end.
Viết chương trình nhập vào mảng A gồm N số nguyên (N<=100). Nhập vào một số nguyên k từ bàn phím. Xuất ra màn hình những phần tử của mảng là bội số của k.
giúp e với a
Viết chương trình nhập vào một mảng nguyên, gồm n phần tử nhập từ bàn phím, hiển thị mảng đã nhập ra màn hình, tính tổng mảng.
viết chương trình nhập vào từ bàn phím mảng một chiều dùng để lưu trữ điểm trung bình của các môn học hãy đưa ra màng hình như sau
A nhập mảng
B in mảng
C tính điểm trung bình môn
D nếu điểm trung bình >=5 thì thồn báo được lên lớp ngược lại thì thông báo thi lại
a)Viết chương trình nhập vào bàn phím 100 số Fibonaci. Cho biết số Fibonaci thứ 100.
b)Viết chương trình nhập vào 20 số chẵn. Xuất ra màn hình số thứ 20.
(Mọi người giúp mình với! Mình cảm ơn nhiều)
viết chương trình nhập vào mảng một chiều.gồm phần tử số nguyên N được nhập từ bàn phím. N nguyên, dương, N<=10
A, in mảng vừa nhập ra màn hình
B, tính tổng các phần tử của mảng, in kết qua ra màn hình
C, đếm số lượng các phần tử có giá trị dương
D, tính trung bình cộng các số có giá trị chẵn
E, in ra màn hình các phần tử là số hoàn hảo
Giúp mình với ạ
Viết chương trình nhập từ bàn phím họ và tên, điểm trung bình của từng môn của một học sinh a) Tính điểm trung bình môn b) Đưa ra màn hình điểm của môn cao nhất c) Đưa ra màn hình những điểm trung bình lớn hơn hoặc bằng 5 d) Đưa ra màn hình những môn có điểm trung bình bằng 10 e) sắp xếp theo thứ tự tăng dần của điểm trung bình
Viết chương trình nhập từ bàn phím họ và tên, điểm trung bình của từng môn của một học sinh a) Tính điểm trung bình môn b) Đưa ra màn hình điểm của môn cao nhất c) Đưa ra màn hình những điểm trung bình lớn hơn hoặc bằng 5 d) Đưa ra màn hình những môn có điểm trung bình bằng 10 e) sắp xếp theo thứ tự tăng dần của điểm trung bình
viết chương trình nhập mảng 1 chiều A gồm m số nguyên từ bàn phím. Đếm số lần xuất hiện của X trong mảng A. với X là số nguyên nhập từ bàn phím. Xất kết quả ra màn hình
Viết chương trình pascal tìm ƯSCLN của N số được nhập từ bàn phím . giúp mk với ạ. mk cảm ơn.
