Viết chương trình nhập n số nguyên đếm xem có bao nhiêu số chia hết cho 2
Chưa hiểu ý bạn lắm, ý bạn là hiển thị có bao nhiêu số chia hết cho hai và chia hết cho ba phải honk
nếu đúng thì như sau nha
Bài làm
program Bai1;
var
n, i, d: integer ;
A: array [1..1000] of integer;
begin
write[‘ nhap so n:’];
read[n];
for i: = 1 to n do:
begin
writeln[‘so han thu A[‘,i,’]=’];
read[A[i]];
end;
for i:=1 to n do if A[i]mod2=0 and A[i]mod3=0 then inc[d]; write[‘co ‘,d ‘ vua chia het cho 2 vua chia het cho 3’];
readln
end.
CHÚC BẠN HỌC TỐT!!
uses crt;
var i,n,d : integer;
a : array[1..100] of integer;
begin clrscr; d:=0;
write[‘Nhap 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] and [a[i] mod 3=0] then d:=d+1;
write[‘Co ‘,d,’ so vua chia het 2 va 3 ‘];
readln
end.
✅ Viết chương trình nhập n số nguyên.Đếm các số vừa chia hết cho 2 vừa chia hết cho 3.Xuất kết quả ra màn hình
Hỏi:
Viết chương trình nhập n số nguyên.Đếm các số vừa chia hết cho 2 vừa chia hết cho 3.Xuất kết quả ra màn hìnhViết chương trình nhập n số nguyên.Đếm các số vừa chia hết cho 2 vừa chia hết cho 3.Xuất kết quả ra màn hình
Đáp:
diepbich:program chia_het_2_3;
uses crt;
var A:array[1..1000] of integer;
n，i，t:integer;
begin
clrscr;
write[‘Nhap n: ‘]; readln[n];
t:=0;
for i:=1 to n do
begin
write[‘Nhap so thu ‘，i，’: ‘]; readln[A[i]];
if [A[i] mod 2=0] and [A[i] mod 3=0] then t:=t+A[i];
end;
write[‘Tong cac so vua chia het cho 2 vua chia het cho 3 la: ‘，t];
readln;
end.
program chia_het_2_3;
uses crt;
var A:array[1..1000] of integer;
n，i，t:integer;
begin
clrscr;
write[‘Nhap n: ‘]; readln[n];
t:=0;
for i:=1 to n do
begin
write[‘Nhap so thu ‘，i，’: ‘]; readln[A[i]];
if [A[i] mod 2=0] and [A[i] mod 3=0] then t:=t+A[i];
end;
write[‘Tong cac so vua chia het cho 2 vua chia het cho 3 la: ‘，t];
readln;
end.
program chia_het_2_3;
uses crt;
var A:array[1..1000] of integer;
n，i，t:integer;
begin
clrscr;
write[‘Nhap n: ‘]; readln[n];
t:=0;
for i:=1 to n do
begin
write[‘Nhap so thu ‘，i，’: ‘]; readln[A[i]];
if [A[i] mod 2=0] and [A[i] mod 3=0] then t:=t+A[i];
end;
write[‘Tong cac so vua chia het cho 2 vua chia het cho 3 la: ‘，t];
readln;
end.
Xem thêm : ...
Vừa rồi, xén.vn đã gửi tới các bạn chi tiết về chủ đề Viết chương trình nhập n số nguyên.Đếm các số vừa chia hết cho 2 vừa chia hết cho 3.Xuất kết quả ra màn hình nam 2022 ❤️️, hi vọng với thông tin hữu ích mà bài viết "Viết chương trình nhập n số nguyên.Đếm các số vừa chia hết cho 2 vừa chia hết cho 3.Xuất kết quả ra màn hình nam 2022" mang lại sẽ giúp các bạn trẻ quan tâm hơn về Viết chương trình nhập n số nguyên.Đếm các số vừa chia hết cho 2 vừa chia hết cho 3.Xuất kết quả ra màn hình nam 2022 [ ❤️️❤️️ ] hiện nay. Hãy cùng xén.vn phát triển thêm nhiều bài viết hay về Viết chương trình nhập n số nguyên.Đếm các số vừa chia hết cho 2 vừa chia hết cho 3.Xuất kết quả ra màn hình nam 2022 bạn nhé.
Tải xuống ví dụ của chúng tôi
Bạn có thể tải xuống sổ làm việc ví dụ cung cấp các ví dụ để bổ sung thông tin trong bài viết này. Hầu hết các mục trong bài viết này sẽ tham chiếu đến trang tính thích hợp trong sổ làm việc ví dụ cung cấp các ví dụ và thông tin thêm.
Tải xuống ví dụ để đếm giá trị trong bảng tính
Trong bài viết này
-
Đếm đơn giản
-
Sử dụng Tự Tính tổng
-
Thêm hàng Tổng phụ
-
Đếm số ô trong một danh sách hoặc cột bảng Excel bằng cách sử dụng hàm SUBTOTAL
-
-
Đếm dựa trên một hoặc nhiều điều kiện
-
Video: Sử dụng các hàm COUNT, COUNTIF và COUNTA
-
Đếm số ô trong một phạm vi bằng cách sử dụng hàm COUNT
-
Đếm số ô trong một phạm vi dựa trên một điều kiện duy nhất bằng cách sử dụng hàm COUNTIF
-
Đếm số ô trong một cột dựa trên một hoặc nhiều điều kiện bằng cách sử dụng hàm DCOUNT
-
Đếm số ô trong một phạm vi dựa trên nhiều điều kiện bằng cách sử dụng hàm COUNTIFS
-
Đếm dựa vào tiêu chí bằng cách dùng kết hợp hàm COUNT và IF
-
Đếm tần suất xuất hiện của nhiều văn bản hay giá trị số bằng cách dùng kết hợp hàm SUM và IF
-
Đếm số ô trong một cột hoặc hàng trong PivotTable
-
-
Đếm khi dữ liệu của bạn chứa các giá trị trống
-
Đếm số ô không trống trong một phạm vi bằng cách sử dụng hàm COUNTA
-
Đếm số ô không trống trong danh sách với các điều kiện cụ thể bằng cách sử dụng hàm DCOUNTA
-
Đếm số ô trống trong một phạm vi liền kề bằng cách sử dụng hàm COUNTBLANK
-
Đếm số ô trống trong một phạm vi không liền kề bằng cách sử dụng kết hợp hàm SUM và hàm IF
-
-
Đếm số lần xuất hiện duy nhất của giá trị
-
Đếm số lượng giá trị duy nhất trong một cột danh sách bằng cách sử dụng Bộ lọc Nâng cao
-
Đếm số lượng giá trị duy nhất trong một phạm vi đáp ứng một hoặc nhiều điều kiện bằng cách sử dụng các hàm IF, SUM, FREQUENCY, MATCH và LEN
-
-
Các trường hợp đặc biệt [đếm tất cả các ô, đếm số từ]
-
Đếm tổng số ô trong một phạm vi bằng cách sử dụng các hàm ROWS và COLUMNS
-
Đếm số từ trong một phạm vi bằng cách sử dụng kết hợp các hàm SUM, IF, LEN, TRIM và SUBSTITUTE
-
-
Hiển thị các phép tính và số lượng trên thanh trạng thái