viết chương trình pascal sử dụng biến mảng để a,nhập từ bàn phím các phần tử của một dãy số,độ dài của dãy cũng được nhập từ bàn phím b,in ra giá trị lớn nhất trong dãy vừa nhập ở câu a c,tính tổng các phần tử chẵn của dãy số vừa nhập ở câu a làm từng câu một nha!!!!!!!!!!!!!

NhuQuynhnguyen0707

2 năm trước

Loga Sinh Học lớp 12

0 lượt thích 21 xem

1 trả lời

Thích Trả lời

sirisiriman

uses crt;
var a:array[1..100] of integer;i,n,max:integer;s:longint;
begin
clrscr;
write('Nhap n: '); readln(n);
for i:=1 to n do
begin
write('Nhap cac so nguyen: '); read(a[i]);
if a[i] mod 2<>1 then s:=s+a[i];
end;
write('Day so nguyen: ');
for i:=1 to n do write(a[i],' ');
max:=a[1];
for i:=2 to n do if a[i]>max then max:=a[i];
writeln;
write('Gia tri lon nhat: ',max);
writeln;
write('Tong cac so chan trong day: ',s);
readln;
end.

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

tritrinh992000

var n,i,k,j,s,max:longint;

a:array [1..100] of integer;

begin

write('nhap n pt');readln(n); max:=0;

for i:=1 to n do

begin

write('pt thu',i);readln(a[i]);

if a[i]>max then a[i]:=max;

if a[i] mod =0 then s:=s+a[i];

end;

write(max);

write(s);

readln

end.

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

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

C1:gió tín phong là loại gió thổi thường xuyên từ vĩ độ nào đến vĩ độ nào? C2:Đới ôn hòa là đới được được tính từ đâu đến đâu?

Đổi: a) 0,175A = …………mA. c) 1250mA = …………A. b) 0,38A = …………mA. d) 280mA = …………A. e) 0,35A = …………mA. h) 425mA = …………A. g) 1,28A = …………mA. i) 32mA = …………A.

Đốt cháy 9,2g chất hữu cơ A thu được 8,96 lít khí CO2 ở đktc và 10,8g nước. biết khối lượng mol của A là 46 a. Hỏi trong A có những nguyên tố nào? b. Xác định công thức phân tử của A

Giúp mk đi mà! Chỉ cần đáp án thôi!!!

Làm cho em luôn câu này em đg cần gấp thank

Nói lên quan điểm của bản thân về tình bạn , tình yêu tuổi học trò ( điểm xấu - tốt )

Cho tam giác ABC có ba góc nhọn AB=2cm AC=4cm trên cạnh AC lấy điểm M sao cho goc ABM bằng góc ACB Chúng minh tam giác ABM đồng dạng với tam giác ABC Từ A kẻ AH vuông góc với BC AK vuông góc với BM chứng minh rằng

Địa phương em đã dùng biện pháp nào để phòng bệnh cho vật nuôi? Nêu ví dụ?

Trên một nửa mặt phẳng bờ chứa tia Ox, vẽ tia Ot sao cho: xÔt = 40 độ, vẽ tia Oy sao cho xOoy = 80 độ a) Tính yÔt ? b) Tia Ot có phải là tia phân giác của góc xÔy không? Tại sao? c0 Vẽ tia Ot phẩy là tia đối của tia Ot. Tính số đo góc kề bù với góc xÔt?

hãy xây dựng thực đơn cho bữa an thường này

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