a=int(input('Nhập a='))

if (a%3 ==0) and (a%5 ==0):

        print(a, 'Chia hết cho 3 và 5')

else

        print(a, 'Không chia hết cho 3 và 5')

#include <bits/stdc++.h>

using namespace std;

long long n,i,s,dem;

int main()

{

cin>>n;

s=0;

dem=0;

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

{

if (i%2==1) 

{

dem++;

s=s+i;

}

}

cout<<fixed<<setprecision(2)<<(s*1.0)/(dem*1.0);

return 0;

}

Var i,n:integer;

Begin

Write('nhap n = ');readln(n);

For i:=1 to n do

If i mod 2 = 1 then write(i,'    ');

Readln;

End.

uses crt;

var kt:boolean;

st:string;

i,d:integer;

begin

clrscr;

readln(st);

d:=length(st);

kt:=true;

for i:=1 to d do 

  if st[i]<>st[d-i+1] then kt:=false;

if kt=true then writeln('Day la xau doi xung')

else writeln('Day khong la xau doi xung');

readln;

end.

long long a,b,dt;

Var a,b:integer;

#include <bits/stdc++.h>

using namespace std;

long long a[1000],i,n,t,dem;

int main()

{

cin>>n;

for (i=1; i<=n; i++) cin>>a[i];

for (i=1; i<=n; i++) cout<<a[i]<<" ";

cout<<endl;

dem=0;

t=0;

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

if (a[i]>0)

{

dem++;

t=t+sqrt(a[i]);

}

cout<<t;

return 0;

}

uses crt;

var a,b,x,t,i:integer;

begin

clrscr;

readln(a,b,x);

t:=0;

for i:=a to b do 

  if i mod x=0 then t:=t+i;

writeln(t);

readln;

end.

31

= 6

#include <bits/stdc++.h>

using namespace std;

long long a[10],i,n,t1,dem1,s;

int main()

{

cin>>n;

for (i=1; i<=n; i++) cin>>a[i];

for (i=1; i<=n; i++) cout<<a[i]<<" ";

cout<<endl;

t1=0;

dem1=0;

s=1;

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

{

if (a[i]%2==0) t1+=a[i];

else dem1+=1;

if ((a[i]%2==0) or (a[i]%3==0)) s=s*a[i];

}

cout<<t1<<endl;

cout<<dem1<<endl;

cout<<s;

return 0;

}

Viết câu lệnh thực hiện yêu cầu sau:

4. Với dữ liệu câu 2, yêu cầu tính và in ra màn hình:

4a. Tổng các số chẵn

4b. Đếm các số lẽ

4c. Tích các số chia hết cho 2 hoặc 3

#include <bits/stdc++.h>

using namespace std;

long long a[10],i,n,t1,dem1,s;

int main()

{

cin>>n;

for (i=1; i<=n; i++) cin>>a[i];

for (i=1; i<=n; i++) cout<<a[i]<<" ";

cout<<endl;

t1=0;

dem1=0;

s=1;

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

{

if (a[i]%2==0) t1+=a[i];

else dem1+=1;

if ((a[i]%2==0) or (a[i]%3==0)) s=s*a[i];

}

cout<<t1<<endl;

cout<<dem1<<endl;

cout<<s;

return 0;

}

x:integer;

y:byte;