Viết chương trình nhập dãy số nguyên A gồm N phần tử với N nhập vào từ bàn phím a) In dãy số A ra màn hình, mỗi phần tử cách nhau một kí tự trống b) Tính tổng các phần tử chia hết cho 3 mà không chia hết cho 5 giúp em vs mai em kt r

ntngoclan01695078653

2 năm trước

Loga Sinh Học lớp 12

0 lượt thích 16 xem

1 trả lời

Thích Trả lời

yhnmkouijk

program ct;

uses crt;

var i,n,S:integer;

A:array[1..100] 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;

writeln('day so vua nhap la');

for i:=1 to n do

write(A[i],' ');

S:=0;

for i:=1 to n do

if (A[i] mod 3=0) and (A[i] mod 5<>0) then S:=S+A[i];

writeln('tong la:',S);

readln

end.

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

nhantrieuchoi

uses crt;

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

i,N,S:longint;

begin

clrscr;

write('Nhap do dai day so: ');readln(N);

for i:=1to N do

begin

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

end;

clrscr;

writeln('Cac phan tu trong mang:');

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

S:=0;

for i:= 1 to N do

if ((A[i]) mod 3 =0) and ((A[i]) mod 5 <>0) then S:=S+(A[i]);writeln;

writeln('Tong cac phan tu chia het cho 3 va khong chia het cho 5 la: ',S);

readln;

end.

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

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

hiện tượng khuếch tán là j cho ví dụ

giải thích từng bước bài sau A = $\frac{1}{30}$ + $\frac{1}{42}$ + $\frac{1}{56}$ + $\frac{1}{72}$ + $\frac{1}{90}$ + $\frac{1}{56}$ + $\frac{1}{110}$ + $\frac{1}{132}$ ty

Mua 5 quyển sách cùng loại được giảm giá 25% giá bìa phải trả 202 500 đồng. Hỏi giá bìa của 1 quyển sách là.....tiền?

Cách vẽ, xác định các đường, các điểm của tam giác ( Cân, đều). Các bạn ơi giúp mình với, mình đang cần gấp.

Chúc mọi người buổi tối tốt lành nhé!! Giúp mình câu này với ạ

357 : x = 29 ( dư 9 ) 2) Một bể đang chưa lượng nước bằng 90 % thể tích bể . Người ta mở 1 vòi nước chảy vào bể , mỗi giờ chảy đc 1/5 bể . Hỏi vòi chạy sau bao lâu thì bể đầy nước

Vẽ sơ đồ nhận biết các chất sau C2h5 , c6h5oh,c3h5(oh)3

giải giúp mình phần bài tập 1 và 2 nhé rùi mình vote cho *****.(ok)

Giúp tui với

Chỉ làm mình vs ạ (ko cần nhanh) cảm ơn