Input: N, dãy số nguyên a1,a2,...,aN và k

Output: Số phần tử là bội của k

Thuật toán liệt kê:

Bước 1: Nhập N, dãy số nguyên a1,a2,...,aN và k

Bước 2: d←0; i←1;

Bước 3: Nếu i>N thì in ra d và kết thúc

Bước 4: Nếu a_i chia hết cho k thì d←d+1; 

Bước 5: i←i+1; quay lại bước 3

-khai báo :

#include<iostream>

using namespace std;

(hoặc bạn có thể khai báo kiểu khác vd :

#include<iostream>

using namespace std;

void show() { ...... }

)

-Tạo 3 biến có thể nhập từ bàn phím a, b, c bằng cách :

int a, b, c;

cin >> a >> b >> c;

-Tạo biến bất kì lưu giá trị của tổng ba số a, b, c bằng cách :

int h = a + b + c;

-xuất ra màn hình giá trị của h / 3 bằng cách :

cout << "(a + b + c) / 3 = " << h / 3;

-kết thúc chương trình :

return 0; 

}

(hoặc tùy bạn)

B

B

D

#include <bits/stdc++.h>

using namespace std;

long long n,i,x,dem;

int main()

{

cin>>n;

dem=0;

for (i=1; i<=n; i++)

{

cin>>x;

if (x>0) dem++;

}

cout<<dem;

return 0;

}

Program hoan_doi;

uses crt;

var x,y,temp:Integer;

begin

x:=3;y:=7;

Writeln('Gia tri cua x truoc khi doi: ',x);

Writeln('Gia tri cua y truoc khi doi: ',y);

temp:=x;

x:=y;

y:=temp;

Writeln('Gia tri cua x sau khi hoan doi: ',x);

Writeln('Gia tri cua y sau khi hoan doi: ',y);

Readln();

end.

Mô tả: Khai báo 3 biến kiểu số nguyên

-Ta gán 3 cho biến x, gán 7 cho biến y

-Sau đó gán giá trị của biến x cho biến temp (để lưu trữ giá trị của biến x);

-Ta gán giá trị của biến y cho biến x (lúc này giá trị của biến x đã bị đổi);

-Rồi gán giá trị của biến temp cho biến y (Giá trị không bị thay đổi theo biến x bởi vì trước khi thay đổi giá trị của biến x thành giá trị của biến y ta đã gán giá trị trước đó của biến x cho biến temp)

1: 

Xác định bài toán:

-Input: Hai số thực a,b(a≠b)

-Output: So sánh a và b

Mô tả thuật toán

-Bước 1: Nhập a và b

-Bước 2: Nếu a>b thì viết a lớn hơn b

Ngược lại thì a nhỏ hơn b

-Bước 3: Kết thúc

Viết chương trình:

uses crt;

var a,b:real;

begin

clrscr;

repeat

write('Nhap a='); readln(a);

write('Nhap b='); readln(b);

until (a<>b);

if a>b then writeln(a,' lon hon ',b)

else writeln(a,' nho hon ',b);

readln;

end.

2: 

Xác định bài toán: 

-Input: Hai số thực a,b(a≠b)

-Output: Tìm số lớn hơn

Mô tả thuật toán

-Bước 1: Nhập a,b

-Bước 2: Nếu a>b thì viết a lớn hơn b

Ngược lại thì viết b lớn hơn a

-Bước 3: Kết thúc

Viết chương trình: 

uses crt;

var a,b:real;

begin

clrscr;

repeat

write('Nhap a='); readln(a);

write('Nhap b='); readln(b);

until (a<>b);

if a>b then writeln(a,' lon hon ',b)

else writeln(b,' lon hon ',a);

readln;

end.