viết chương trình có sử dụng biến mảng để lưu laị dãy n số được nhập từ bàn phím a ) tìm ra số lớn nhất b) tìm ra các số chẵn

buihuyen123

2 năm trước

Loga Sinh Học lớp 12

0 lượt thích 27 xem

1 trả lời

Thích Trả lời

khai12hd

program mang;

uses crt;

var A:array [1..500] of integer;

n,i,max: integer;

Begin

write('Nhap so phan tu: '); readln(n);

for i:=1 to n do

begin

write('A[',i,']='); readln(A[i]);

end;

write('Mang vua nhap la: ');

for i:=1 to n do write(A[i],' ');

writeln;

max:=A[1];

for i:=2 to n do

if max<A[i] then max:=A[i];

writeln('a) So lon nhat trong mang la: ',max);

write('b) Cac so chan trong mang: ');

for i:=1 to n do

if A[i] mod 2=0 then write(A[i],' ');

readln

End.

Vote (0) Phản hồi (0) 2 năm trước

jacksonyee2817

uses crt;

var a:array [1..1000] of integer;

i,n,max: integer;

begin

clrscr;

write('Nhap so phan tu: '); readln(n);

for i:=1 to n do

begin

write('nhap a[',i,']: '); readln(a[i]);

end;

for i:=1 to n do

if max<A[i] then max:=A[i];

writeln('a/ So lon nhat trong mang la: ',max);

write('b/ Cac so chan trong mang: ');

for i:=1 to n do

if a[i] mod 2=0 then write(a[i],' ');

readln;

End.

Vote (0) Phản hồi (0) 2 năm trước

Các câu hỏi liên quan

Thách anh em vẽ được itadori yuji

Câu 1: cho đoạn văn sau Tiếng hây ngừng.Cả tiếng cười.Căn phòng trở nên yên tĩnh khiến Nam lúng túng a) Xác định câu rút gọn trong đoạn b) Bộ phận nào của câu được rút gọn Câu 2 Xác định câu đặc biệt trong đoạn văn sau và cho biết tác dụng cụ thể của câu : Đẹp quá ! Bên bờ suối ,đàn công đang xoè cánh múa

1 khu đất hình chữ nhật có chiều dài 72m.Chiều rộng bằng 1 phần 3 chiều dài.Tính chu vi khu đất đó ?

vẽ cặp đôi yêu nhau tô màu 2 pic 1 ảnh dưới 1 ảnh tự nghĩ nhớ vẽ đep ảnh kia t học đc ở chị gái làm họa sĩ chưa giỏi nhưng đẹp ai trả lời vẽ đẹp nhớ cặp đôi

em hãy hoàn thiện những thông tin còn thiếu vào bảng so sánh các quốc gia cỏ đâị phương đông và phương tây ( về sự hình thành, điều kiện tữ nhiên, kinh tế chính, thời gian hình thành, cở cấu xã hội và thể chế nhà nước )

Hãy giải thích cho mình . một ngọn núi A có độ cao 3000m , nhiệt độ ở vùng chân núi là 25 độ c vẫy nhiệt độ ở vùng chân núi là bao nhiêu độ c , biết rằng cứ lên cao 100 m nhiệt độ lại giảm đi o,6 độ c tại sao lại chọn là 7 độ c . hãy giải thích tại sao

cho hình tròn (O,4cm) điểm a nằm ngoài hình tròn. từ a vẽ tiếp tuyến ab,ac đến đường tròn(b,c là hai tiếp điểm). Biết bc= 4cm tính oa

Giúp mk bài 34 vs chiều mk phải nộp r!!!!!!

Viết 1 lá thư ( formal letter ) gửi cho trung tâm Tiếng Anh về một khóa học em muốn học. ( 50-60 words )

Câu hỏi: ở 1 loài có bộ NST 2n=46, một tế bào sinh dục sơ khai đực nguyên phân liên tiếp 5 lần. Hãy xác định: 1.Số tế bào còn tạo ra sau 5 lần nguyên phân liên tiếp 2.Xác định số NST, số cromatit trong 1 tế bào ở kì giữa nguyên phân

Loga.vn - Cộng Đồng Luyện Thi Trực Tuyến