Var a:integer;
Begin
Writeln('nhap mot so nguyen: '); Readln(a);
If a mod 2 = 0 then writeln(a,' la so chan')
        else writeln(a,' la so le');
End.

mình chưa hiểu rõ đề lắm nên mình sẽ làm tạm như thế này còn nếu bạn muốn kiểu khác thì cứ bình luận để mình làm lại.

câu 1 :

#include<iostream>

using namespace std;

int main() {

long long a;

cout << "giá trị của a: "; cin >> a;

if (a % 2 != 0 && a % 5 == 0) {

cout << "a là một số lẻ chia hết cho 5"

} else {

cout << "a không phải là một số lẻ chia hết cho 5";

}

return 0;

}

câu 2 :

#include<iostream>

using namespace std;

int main() {
int a;

cout << "giá trị của a là: "; cin >> a;

if (a % 2 == 0 && a % 5 == 0) {

cout << "a là một số chẵn chia hết cho 5";

} else {
cout << "a không phải là một số chẵn chia hết cho 5";

}

return 0;

}

(Mình viết ở ngôn ngữ C++)

TK:

uses crt;
var n: longint;
begin
clrscr;
    readln(n);
    if n mod 2 = 0 then writeln('Chan') else writeln('Le');
readln;
end.

#include<bits/stdc++.h>

using namespace std;

long long N;

int main()

{
cin>>N;

if(N%2==0) cout<<N<<" là số chẵn";

if(N%2!=0) cout<<N<<" là số lẻ";

}

#include <bits/stdc++.h>

using namespace std;

int main()

{

long long n;

cin>>n;

if (n%2==0) cout<<n<<" la so chan"<<endl;

else cout<<n<<" la so le"<<endl;

if (n<0) cout<<n<<" la so am";

else cout<<n<<" la so khong am";

return 0;

}

#include <bits/stdc++.h>

using namespace std;

long long n;

int main()

{

cin>>n;

if (n%2==0) cout<<"Chan";

else cout<<"Le";

return 0;

}

Program Tin_hoc;

Uses Crt;

Var N: Integer;

Begin

        Write('Nhap so nguyen N');

        Readln(N);

        If N>0 then write(' So do la so duong ');

        If N<0 then write(' So do la so am ');

        If N=0 then write(' So do khong la so am va so duong');

        Readln;

End.

Program Tin_hoc;

Uses Crt;

Var N: Integer;

Begin

        Write('Nhap so nguyen N');

        Readln(N);

        If N>0 then write(' So do la so duong ');

        If N<0 then write(' So do la so am ');

        If N=0 then write(' So do khong la so am va so duong');

        Readln;

End.

#include <bits/stdc++.h>

using namespace std;

long long n;

int main()

{

cin>>n;

if (n<0) cout<<"la so am";

else cout<<"la so duong";

return 0;

}