var A:array [1..102] of integer;
begin
write('n = '); readln(n);
for i:=1 to n do begin
write('A[',i,'] = ');
readln(A[i]);
end;
d:=0;
for i:=1 to n do if (A[i] mod 3 = 0) and (A[i] mod 2 = 1) then d : = d+1;
write('Trong day co ',d,' so le chia het cho 3 ');
readln
end.
cho mảng A gồm N phần tử thuộc kiểu nguyên (0<N<103). Viết chương trình đếm số lượng số lẻ và chia hết cho 3 của mảng A
Viết chương trình nhập từ bàn phím dãy số nguyên A gồm N phần tử a1, a2, …, aN (1 £ N £ 100) 1- Tính tổng các số lẻ chia hết cho 3 2- Đếm các số chẵn ở vị trí lẻ 3- Đưa ra mà hình danh sách các số chẵn chia hết cho 5 Giúp tui zoiiii
viết chương trình nhập vào 1 mảng 1 chiều gồm n phần tử ( với n được nhập vào từ bàn phím ) hãy thực hiện các công việc sau :
-nhập/xuất mảng
-đếm các số hoàn hảo có trong mảng
-tính tổng các phần tử chẵn trong mảng .
Viết chương trình nhập từ bàn phím dãy số nguyên B gồm N phần tử b1, b2, …, bN (1 £ N £ 100) 1- Tính tổng các số chẵn chia hết cho 5 2- Đếm các số lẻ ở vị trí chẵn 3- Đưa ra mà hình danh sách các số lẻ chia hết cho 3
Viết chương trình nhập từ bàn phím dãy số nguyên B gồm N phần tử b1, b2, …, bN (1 £ N £ 100) 1- Tính tổng các số chẵn chia hết cho 5 2- Đếm các số lẻ ở vị trí chẵn 3- Đưa ra mà hình danh sách các số lẻ chia hết cho 3 Help tui mng oi
Câu 1 viết chương trình - nhập vào mạng một chiều A gồm n phần tử thuộc kiểu Nguyên ( O< N
Bài 7: Viết chương trình đọc từ file INP một dãy số nguyên A gồm có N phần tử (N<=10000). Ghi vào file OUT: dòng 1 ghi dãy số vừa nhập, dòng 2 ghi tổng của dãy số, dòng 3 ghi đếm các số dương có trong dãy và dòng 4 ghi tính tổng của các số dương đó.
BAI7.INP | BAI7.OUT |
6 10 -5 6 -7 -9 4
| 10 -5 6 -7 -9 4 -1 3 20 |
Bài tập tệp Bài 1: Viết chương trình mở tệp dayso.TXT để đọc các số nguyên ra biến n và tính tổng các số nguyên n chia hết cho 3 hoặc 5? Bài 2: Viết chương trình nhập 50 số nguyên bất kì từ bàn phím và ghi các số nguyên lẻ đã nhập vào tập sole.TXT
Bài tập chương trình con: (procedure và function) Bài 1: Viết hàm tính n giai thừa của một số nguyên dương (n!) Bài 2: Viết hàm tính tổng các số lẻ chia hết cho 5 từ 1 đến n Bài 3: Viết thủ tục thực hiện việc hoán đổi 2 giá trị của a và b
Viết chương trình nhập mảng 1 chiều gồm 10 số nguyên. Đưa ra màn hình tổng các số hạng là chẵn
