Lời giải :
program hotrotinhoc ;
var a: array[1..9999] of integer ;
i,k,n,dem : integer ;
begin
write('Nhap so phan tu '); readln(n);
writeln('Nhap gia tri cua cac phan tu ');
for i:= 1 to n do
begin
write('a[',i,']='); readln(a[i]);
end;
write('nhap gia tri cua k='); readln(k);
for i:= 1 to n do
if a[i] = k then dem:=dem+1 ;
write('Day so k xuat hien so lan la :',dem);
readln
end.
: Hãy mô tả thuật toán cho các bài toán sau:
a) Tính tổng các phần tử chia hết cho 3 và chia hết cho 9 trong dãy gồm n số a1, a2, a3, …, an.
b) Tính tổng các ước số của một số nguyên N.
c) Hoán đổi giá trị của hai số nguyên M và N.
d) Tìm ước chung lớn nhất của hai số X và Y
Hãy dùng phương pháp liệt kê để thể hiện thuật toán của bài toán sau:
Cho một dãy a gồm n số nguyên a1,a2,..an được nhập từ bàn phím (n<=100) có giá trị tuyệt đối không lớn hơn 1000. Hãy cho biết a có phải là một cấp số cộng không?
Viết chương trình tính tổng các số chẵn dãy n số nguyên với n được nhập từ bàn phím
hãy xác định bài toán và viết thuật toán để đếm xem trong dãy A các số a1; a2; ...an có bao nhiêu số chẵn và bao nhiêu số lẻ
1. Viết chương trình yêu cầu nhập số nguyên N từ bàn phím. Tính tổng các số nguyên đầu tiên của N theo công thức S= \(\dfrac{1}{3}+\dfrac{1}{5}+\dfrac{1}{7}...+\dfrac{1}{2N+1}\)(với N \(\ge\)1). Sau đó in kết quả ra màn hình.
2. Cho dãy số sau: 2; 5; 8; 11. Viết chương trình yêu cầu nhập số nguyên N từ bàn phím. Tính tích E, sau đó in ra màn hình.
E= 2.5.8.11.. } N số nguyên
giúp mình với ạ
Viết thuật toán tính tổng các số nguyên âm chẵn trong dãy a1, a2,...an
viết thuật toán tính tổng các phần tử dương của dãy n số thực được lần lượt nhập vào máy tính
viết trương trính nhập vào 2 số nguyên dương in ra màn hình từ 1->k vs k là tích của m và n
Em hãy xác định input , output mô tả thuật toán và viết chương trình cho các bài toán sau : Bài1: nhập vào một số nguyên xem có chia hết cho 5 hay Bài 2: nhập vào số tự nhiên gồm 4 chữ số in các chữ số ra màn hình
