uses crt;
var a:array[1..100]of integer;
n,i,max:integer;
begin
clrscr;
write('Nhap n='); readln(n);
for i:=1 to n do
begin
write('A[',i,']='); readln(a[i]);
end;
max:=a[1];
for i:=1 to n do
if max<a[i] then max:=a[i];
writeln('Gia tri lon nhat la: ',max);
readln;
end.
viết chương trình a,nhập 1 mảng 1 chiều gồm n phần tử là số nguyên
b,in ra màn hìnhmangr vừa nhập
c, in ra màn hình các số chắn trong mảng
d,in ra màn hình các số chính phương trong mảng
viết chương trình sử dụng biến mảng nhập vào n số nguyên từ bàn phím và in ra màn hình tổng các số chia hết cho 3
1/Viết chương trình nhập vào một mảng số nguyên sắp xếp lại mảng đó theo thứ tự giảm dần
2/ Viết chương trình cho phép nhập vào 1 mảng gồm N phần tử, cho biết số nhỏ nhất trong các số vừa nhập là số thứ mấy
giúp em với ak
Viết chương trình nhập vào 1 mảng số thực gồm n phẩn tử (1<n<=50). Tìm phần tử lớn nhất, nhỏ nhất và in ra giá trị của nó trên màn hình
Tính giá trung bình của các phần tử có trong mảng
giúp vs
Viết chương trình nhập vào một dãy gồm N số nguyên (N được nhập từ bàn phím). In ra màn hình tổng các phần tử chẳn, tổng các phần tử lẻ và giá trị lớn nhất của dãy số.
Câu 1 viết chương trình tính giá trị biểu thức với x,y là các số nguyên dc nhập từ bàn phím. In kết quả ra màn hình Caau2 viết chương trình vào 3 số nguyên a,b,c.In ra màn hình số lớn nhất trong 3 số đó
Viết chương trình nhập số N số thực từ bàn phím vào một mảng tình trung bình cộng các số vừa nhập
Viết chương trình có sử dụng mảng các phần tử nhập vào từ bàn phím. Độ dài của dãy số nhập vào từ bàn phím.In tổng các số chẵn
