Uses crt;
var i,n: longint;
b: array[1..100] of longint;
begin clrscr;
readln(n);
for i:=1 to n do begin
read(b[i]); readln;
end;
for i:=1 to n do begin
if(b[i]<0) then writeln(b[i]); break;
end;
readln;
end.
Viết chương trình nhập vào mảng số nguyên gồm 5 phần tử sau đó in ra màn hình phần tử có giá trị lớn nhất Câu 2: viết chương trình nhập vào mảng số nguyên gồm 6 phần tử sau đó in ra màn hình giá trị nhỏ nhất
Viết chương trình nhập một mảng số nguyên gồm 5 phần tử. Sau đó tính tích các phần tử là số âm và chia hết cho 2 , rồi in kết quả ra màn hình.
Viết Chương trình nhập vào mảng số nguyên gồm 6 phần tử sau đó in ra màn hình giá trị nhỏ nhất
Viết chương trình nhập vào mảng số nguyên gồm 6 phần tử sau đó in ra màn hình tổng phần tử có giá trị là số chia hết cho 3 và 5
Viết chương trình nhập vào mảng số nguyên gồm 6 phần tử sau đó in ra màn hình tích các phần tử có giá trị là số chia hết cho 3 Giúp nhé
Viết chương trình nhập vào dãy gồm n phần tử (n<15). Sau đó in ra màn hình giá trị các phần tử đó và cho biết có bao nhiêu phần tử có giá trị là số nguyên tố , in ra màn hình các số nguyên tố đó.
Viết chương trình nhâp vào mảng số nguyên gồm 5 phần tử sau đó in ra màn hình tổng các phần tử có giá trị lớn hơn 7
viết câu lệnh nhập giá trị biến mảng gồm 20 phân tử và in ra màn hình mảng gồm 20 phân tử đó?
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
