Viết chương trình nhập vào 1 mảng gồm 5 phần tử số nguyên. In ra màn hình giá trị các phần tử có giá trị chẵn. In ra thông báo tổng của mảng vừa nhập trên

vukalilo123

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

neysaohoa123

program ct;

uses crt;

var i,n,s:integer;

A:array[1..5] of integer;

begin

clrscr;

write('nhap n:=');readln(n);

for i:=1 to n do

begin

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

end;

for i:=1 to n do

if A[i] mod 2=0 then writeln(A[i]);

s:=0;

for i:=1 to n do s:=s+A[i];

writeln('tong la:',s);

readln

end.

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

Ngolinh123321

program ct;

uses crt;

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

i,n,S:longint;

begin clrscr;

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

for i:=1 to n do

begin

write('Nhap A[',i,']: '); readln(A[i]);

end;

for i:=1 to n do

if A[i] mod 2=0 then writeln(A[i]:3);

for i:=1 to n do

S:=S+A[i];

writeln('Tong mang A la: ',S);

readln;

end.

Học tốt!

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

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

câu 1 : nêu cách khởi động phần mềm logo

Viết đoạn văn diễn dịch từ 8-10 câu trong đó có câu văn chức thành phần khởi ngữ(gạch chân thành phần khởi ngữ)với câu chủ đề: Tuổi trẻ cần biết ước mơ.

Giải giúp mik bài 2 và bài 3 với ạ Cảm ơn trc ạ

Trình bày các thu nhập của các gia đình việt nam

Chứng tỏ n trong biểu thức dưới đây thì luôn *với phân sô thì luôn được kết quả tối giản 7*n+4/5*n+3 N=mấy các bạn giups mình với Mình sẽ vote 5 🌟 cho bạn nào làm đuoc bài này

Khhhghnnmjjjjjj 2 bài nhé, mod hoặc chuyên gia giúp vs, k bt thì m.n đừng làm ạ

Mexico là nước tiến hành công nghiệp hoá với mức độ như thế nào và thời gian ra sao? Ai giúp vs mik cần gấp

Những hành vi vi phạm và những hành vi thực hiện tốt quyền và nghĩa vụ của công dân trong hôn nhân hiện nay

Bài này là bài cô giao nhưng em ko biết có ai biết ghi lại công thức giúp em

there is a wide and ...... selection of cheese at dairy store ( vary )

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