Viết chương trình nhập vào mảng A gồm n số nguyên?
Viết chương trình nhập vào mảng A gồm n số nguyên. In các phần tử của mảng A ra màn hình và các phần tử của mảng chia hết cho cả 2, 3, 5 và tổng của chúng (n được nhập vào từ bàn phím).
Trả lời (2)
-
uses crt;
var n,i,dem,j:longint;
a:array[1..100]of longint;
begin
clrscr;
readln(n);
for i:=1 to n do readln(a[i]);
write('Day so: ');
for i:=1 to n do write(a[i],' ');
write('Cac so chia het cho 2,3,5: ');
for i:=1 to n do if (a[i] mod 2=0)and(a[i] mod 3=0)and(a[i] mod 3=0)then
begin
write(a[i],' ');
dem:=dem+a[i];
end
else if n=a[i] then write('0');
write('Tong cua chung: ',dem);
readln
end.
bởi Nguyen Thu
03/04/2019
Like (1) Báo cáo sai phạm -
1
bởi Cao Anh Duy
18/04/2019
Like (0) Báo cáo sai phạm
Nếu bạn hỏi, bạn chỉ thu về một câu trả lời.
Nhưng khi bạn suy nghĩ trả lời, bạn sẽ thu về gấp bội!
Mời gia nhập Biệt đội Ninja247
Lưu ý: Các trường hợp cố tình spam câu trả lời hoặc bị báo xấu trên 5 lần sẽ bị khóa tài khoản
Video HD đặt và trả lời câu hỏi - Tích lũy điểm thưởng
Các câu hỏi có liên quan
-
Mô tả thuật toán tính tổng của n số lẻ từ 1 đến n
17/06/2020 | 0 Trả lời
-
1-1/3+1/5-1/7+....+1/2n-1 - 1/2n+1
10/06/2020 | 0 Trả lời
-
1. Viết chương trình nhập vào một mảng rồi in ra mảng vừa nhập.
2. Viết chương trình nhập vào một mảng rồi tìm giá trị lớn nhất của mảng đó
Các bạn giúp mình với ạ, hôm đó mình có nghỉ nên không nắm vững được bài dẫn đến không biết cách làm.
09/06/2020 | 0 Trả lời
-
Thế nào là dữ liệu kiểu mảnh
05/04/2020 | 4 Trả lời
-
07/01/2020 | 14 Trả lời
-
Hãy cho biết có mấy kiểu dữ liệu? Kể tên và nêu ví dụ
16/12/2019 | 0 Trả lời
-
Giải giùm mình với
02/11/2019 | 3 Trả lời
-
Nêu các kiểu dữ liệu thường dùng nhất
14/10/2019 | 2 Trả lời
-
Viết chương trình tính S= 1/2! +1/3!+ ... + 1/n!
09/10/2019 | 2 Trả lời
-
Nhập vào mảng gồm n phần tử ( n < 100 ) và số nguyên k. Hỏi có bao nhiêu số nguyên k trong mảng
Help me, pleaseee!!!
03/04/2019 | 1 Trả lời
-
Viết chương trình tìm dáy số thuộc dòng thứ N (với N nhập từ bàn phím) của tam giác Pascal.
17/03/2019 | 1 Trả lời
-
P=1*2*3*4..*100
05/03/2019 | 3 Trả lời
-
Viet pt nhap vao 8 so nguyen roi tim so lon nhat trong day so do
22/02/2019 | 2 Trả lời
-
Viết chương trình nhập vào 1 số nguyên m. Kiểm tra xem m có phải là số lẻ chia hết cho 3 hay không.
13/02/2019 | 2 Trả lời
-
Viết chương trình nhập vào mảng A gồm n số nguyên. In các phần tử của mảng A ra màn hình và các phần tử của mảng chia hết cho cả 2, 3, 5 và tổng của chúng (n được nhập vào từ bàn phím).
10/01/2019 | 2 Trả lời
-
VIẾT CÁC BIỂU THỨC SAU DƯỚI DẠNG KÍ HIỆU TRONG NGÔN NGỮ PASCAL
a) 5x3 + 2x2 - 8x + 15
b)
c)
d) b2 - 4ac
e) 1038
f) - 10-38
h) ( |x| - 1)2
i)
02/01/2019 | 2 Trả lời
-
viết chương trình tính tổng các số nguyên lẻ từ 1-2 n ( N là số nguyên nhập từ bàn phím ) (n thuộc z *)
17/12/2018 | 0 Trả lời
-
Viết chương trình,giải phương trình bậc nhất dạng tổng quát bx+C=0 với b,c là hai số bất kì được nhập từ bàn phím
10/12/2018 | 0 Trả lời
-
a. tìm số lớn nhất của dãy số
b. so sánh 3 số a,b,c
06/12/2018 | 0 Trả lời
-
quy tac dat ten la j?
03/12/2018 | 1 Trả lời
