a. 

Bước 1: Nhập 2 số a, b

Bước 2: In ra màn hình a+b

Bước 3: In ra màn hình a-b

Bước 4: In ra màn hình a*b

Bước 5: In ra màn hình a/b. Kết thúc thuật toán

b. 

Bước 1: Nhập vào số a là cạnh của 1 hình vuông

Bước 2: In ra a*4 (Chu vi) và a*a (Diện tích). Kết thúc thuật toán

c. 

Bước 1: Nhập 2 số M và N

Bước 2: Tính a = M mod 2 và b = N mod 2

Bước 3: Nếu cả a và b đều bằng 0 hoặc 1 thì in ra "ĐÚNG", ngược lại in ra "SAI"

Bước 4: Kết thúc thuật toán

d. 

Bước 1: Nhập số N

Bước 2: i <- 1. Lập 1 mảng A

Bước 3: Nếu i > N thì xuống bước 5

Bước 4: Nhập vào $A_{i}$. Quay lại bước 3.

Bước 5: Set lại i <- 1, kq <- 0

Bước 6: Nếu i > N xuống bước 8.

Bước 7: Nếu  10 < $A_{i}$ < 20 thì kq <- kq + 1. Quay lại bước 6

Bước 8. In ra biến kq rồi kết thúc thuật toán

Dùng C++ hay Pascal hay C# hayC vậy bạn

Mình làm Pas trước cho nhanh, nếu bạn cần code C++/C#/C thì bình luận để mình sửa code lại cho đúng.

Program Tin_hoc;

Uses crt;

Var a,b,x,m,n,dem: int64;

      i,k: integer;
      M: array[1..100]: integer;

Begin

(*Cau a*)

        Writeln('Nhap lan luot so a,b cach nhau boi dau cach: '); Read(a); Read(b);

        Writeln;

        Writeln('a+b=';a+b);

        Writeln('a-b=';a-b);

        Writeln('a*b=';a*b);

        Writeln('a/b=';a/b);

(*Cau b*)

        Writeln('Nhap canh hinh vuong: '); Readln(x);

        Writeln('Chu vi hinh vuong: ';x*4);

        Writeln('Dien tich hinh vuong: '; x*x);

(*Cau c*)

        Writeln('M='); Readln(m);

        Writeln('N='); Readln(n);

        If (m-n) mod 0 = 0 then writeln(m,'',n,' deu co dung tinh chan, le')

        else writeln(m,'',n,' khong co cung tinh chan le');

(*Cau d*)

        Writeln('Nhap so so hang: '); Readln(k);

        dem:=0;

        For i:=1 to k do read(M[i]);  (*Lan luot nhap cac so cach nhau boi dau cach*)

        For i:=1 to k do 

                If (M[i]>10) and (M[i]<20) then dem:=dem+1;

        Writeln('So so hang lon hon 10 nho hon 20 trong day tren la: ', dem);

        Readln

End.