uses crt;
var a:array[1..100]of integer;
i,n:integer;
begin
clrscr;
write('n='); readln(n);
for i:=1 to n do
begin
write('a[',i,']='); readln(a[i]);
end;
for i:=1 to n do
if a[i]>0 then write(a[i]:4);
writeln;
for i:=1 to n do
if a[i]<0 then write(a[i]:4);
readln;
end.
2. Viết CT nhập vào dãy số nguyên có n phần tử. In ra vị trí các phần tử âm.
3. Viết CT nhập vào dãy số tự nhiên có n phần tử. In ra giá trị các phần tử ở vị trí lẻ.
4. Tìm phần tử lớn nhất và nhỏ nhất trong 1 dãy phần tử.
Cho một dãy gồm N các số nguyên (nhập từ bàn phím). Hãy viết chương trình thực hiện các yêu cầu sau: a. Tìm và tính tổng các số nguyên tố trong dãy. b. Tìm và in ra các số nguyên dương, nguyên âm có trong dãy, tìm số nguyên âm lớn nhất và số nguyên dương nhỏ nhất của dãy. c. Sắp xếp các số nguyên dương lên đầu dãy, các số nguyên âm tiếp theo và cuối cung là số 0. ( Nếu loại số nào không có thì in ra “ Trong day khong có so ...”)
sử dụng biến mảng Viết chương trình nhập vào dãy số gồm n số nguyên từ bàn phím in ra màn hình tổng các số dương trong dãy số đó Giúp mình với
viết ct nhập 1 dãy số gồm n số từ bàn phím, in ra dãy vừa nhập, in ra số lẻ, chẳn trong dãy, tính tổng các số chẳn và lẻ, tính trung bình cộng các số
1. Viết chương trình nhập vào máy 1 mảng số nguyên bất kỳ, thống kê và in ra số phần tử âm trong mảng.
2. Viết chương trình nhập vào máy 1 mảng số nguyên bất kỳ, thống kê và in ra số phần tử dương trong mảng.
Mn giúp mình với!!!!!!
Viết chương trình nhập vào 1 dãy số nguyên gồm M phần tử, tính tổng các số âm trong dãy số đó. In ra màn hình giá trị tổng
Bài 1: Nhập từ bàn phím một dãy số nguyên ko âm. Hãy in ra màn hình chỉ số i nhỏ nhất sao cho tổng các phần tử từ 1 đến i lớn hơn 100.
Bài 2: Hãy viết chương trình Pascal để thực hiện các nhiệm vụ sau:
_ Nhập vào tù bàn phím 1 dãy số ko quá 30 số nguyên
_ Kiểm tra rồi cho biết dãy số vừa nhập có pải là dãy số ko giảm hay ko ? ( VD 1,2,5,5,6,8,9 là dãy số ko giảm )
Anh chị em bạn dì chú bác ông bà bố mẹ cậu mợ bá ơi, giúp với, cần gấp lắm, ngày kìa thi rồi.....
Viết chương trình sử dụng biến mảng nhập vào một dãy n số nguyên rồi in ra màn hình các phần tử lớn hơn không và chia hết cho 5 từ dãy số đó. Mình sẽ tick cho bạn nào giúp mình
