Giúp em môn tin học liền với ạ!câu 1viết chương trìnha. đếm có bao nhiêu số chẵn chia hết cho 3 có 3 chữ sốb.Kiểm tra n có phải là số nguyên tố khôngc.Kiểm tra n có phải là số chính phương khôngd.kiểm...

JB

Just Bonell

14 tháng 2 2023

Giúp em môn tin học liền với ạ!câu 1viết chương trìnha. đếm có bao nhiêu số chẵn chia hết cho 3 có 3 chữ sốb.Kiểm tra n có phải là số nguyên tố khôngc.Kiểm tra n có phải là số chính phương khôngd.kiểm tra n có phải là số hoàn hảo không(n được nhập từ bàn phím)e. tính a^nf.Tính a giai thừacảm ơn nhiều...

Đọc tiếp

#Tin học lớp 8

0

JB

Just Bonell

14 tháng 2 2023

:(

Đúng(0)

TL

Thế Long

1 tháng 1 2021

Giúp mình với ạ

Nhập vào dãy số nguyên có n phần tử (n<=52). Nhập vào một số nguyên k, đếm xem trong dãy có bao nhiêu số chia hết cho k. Kiểm tra lượng số chia hết cho k là chẵn hay lẻ

#Tin học lớp 11

2

LD

Luân Đào

1 tháng 1 2021

var n,i,k,d: integer;

a:array[1..52] of integer;

begin

write('Nhap so N: '); readln(n);

for i:=1 to n do

begin

write('a[',i,'] = '); readln(a[i]);

end;

write('Nhap so k: '); readln(k);

d:=0;

for i:=1 to n do

if a[i] mod k = 0 then d:=d+1;

writeln('Co ',d,' so chia het cho ',k,' trong day');

if d mod 2 = 0 then writeln('Chan') else writeln('Le');

end.

Đúng(0)

NL

Nguyễn Lê Phước Thịnh

2 tháng 1 2021

uses crt;

var a:array[1..52]of integer;

i,n,k,dem:integer;

begin

clrscr;

repeat

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

until (0<n) and (n<=52);

for i:=1 to n do

begin

write('A[',i,']='); readln(a[i]);

end;

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

dem:=0;

for i:=1 to n do

if a[i] mod k=0 then inc(dem);

writeln('Trong day co ',dem,' so chia het cho ',k);

if dem mod 2=0 then writeln('So luong so chia het cho ',k,' la so chan')

else writeln('So luong so chia het cho ',k,' la so le');

readln;

end.

Đúng(0)

TL

Trần Long

14 tháng 1 2023 - olm

Viết chương trình cho người dùng nhập vào số nguyên dương n, rồi kiểm tra các số nhập vào có phải là số nguyên tố hay không? Và đếm xem có bao nhiêu số nguyên tố được nhập vào thì in ra màn hình.

#Tin học lớp 10

0

X

XitsuKata

23 tháng 12 2022

Câu 1: Viết chương trình nhập từ bàn phím số nguyên n (số đối của n<10^9). Kiểm tra n có phải là số nguyên dương và chia hết cho 5.
Câu 2: Viết chương trình nhập từ bàn phím số nguyên n (số đối của n<10^9). Kiểm tra n có phải là số nguyên dương và chia hết cho 3.

#Tin học lớp 8

1

NL

Nguyễn Lê Phước Thịnh

24 tháng 12 2022

Cau 1:

Câu 2:

#include <bits/stdc++.h>

using namespace std;

long long n;

int main()

{

cin>>n;

if (n>0 && n%5==0) cout<<"Phai";

else cout<<"Khong phai";

}

Đúng(0)

TL

Trần Long

19 tháng 1 2023 - olm

Sử dụng Python để Viết chương trình cho người dùng nhập vào số nguyên dương n, rồi kiểm tra các số nhập vào có phải là số nguyên tố hay không? Và đếm xem có bao nhiêu số nguyên tố được nhập vào thì in ra màn...

Đọc tiếp

#Tin học lớp 10

0

YL

Yna Lolipop

2 tháng 3 2022

Câu 1: viết chương trình nhập vào N số tự nhiên đầu tiên,đếm xem có bao nhiêu số là số chẵn Câu 2: Viết chương trình nhập vào N số tự nhiên tính tổng các số chia hết cho 3 Em cần gấp lắm ạ:(

#Tin học lớp 8

1

NL

Nguyễn Lê Phước Thịnh

2 tháng 3 2022

1:

#include <bits/stdc++.h>

using namespace std;

long long dem,i,n,x;

int main()

{

cin>>n;

dem=0;

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

{

cin>>x;

if (x%2==0) dem++;

}

cout<<dem;

return 0;

}

Câu 2:

#include <bits/stdc++.h>

using namespace std;

long long x,n,i,t;

int main()

{

cin>>n;

t=0;

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

{

cin>>x;

if (x%3==0) t+=x;

}

cout<<t;

return 0;

}

Đúng(0)

TH

trần hoàng

6 tháng 4 2022

viết chương trình nhập vào một số nguyên dương n . Rồi xuất ra màn hình các yêu cầu sau:

a, Số n có bao nhiêu chữ só.

b, Tổng các chữ số của n.

c, Số n có phải là số nguyên tố không.

d, Tổng các chữ số của nó có phải là số nguyên tố không.

mn giúp em vs ạ

#Tin học lớp 8

1

LT

Lê Trần Kim Hoàng

7 tháng 2 2023

program ct;
uses crt;
var dem,n,s,max,t:longint;
begin
writeln('nhap n:');readln(n);
while n>0 do begin
s:=n mod 10;
t:=t+s;
if max<s then max:=s;
dem:=dem+1;
n:=n div 10;
end;
writeln('tong la',t,',','co',' ',dem,' ','chu so',',','chu so lon nhat la:',max);
readln
end.

bạn xem lại nha mik làm đây nhưng k bt đk

Đúng(0)

NB

nam bảo

23 tháng 2 2022

giúp mk vs mn.KO DÙNG C+ Viết chương trình nhập số tự nhiên n<m(1<n<m<100000).In ra màn hình.1.Kiểm tra số n có phải là số nguyên tố hay ko.2.Đếm,tính tổng và in ra các số nguyên tố <n.3.Đếm,tính tổng và in ra các số nguyên tố <m và >n.4.In ra m số nguyên tố đầu...

Đọc tiếp

#Tin học lớp 8

1

NL

Nguyễn Lê Phước Thịnh

24 tháng 2 2022

uses crt;

var n,m,i,dem,t,t1,d1:integer;

//chuongtrinhcon

function ktnt(var n:integer):boolean;

var i:integer;

kt:boolean;

begin

kt:=true;

for i:=2 to trunc(sqrt(n)) do

if n mod i=0 then kt:=false;

if (kt=true) then ktnt:=true

else ktnt:=false;

end;

//chuongtrinhchinh

begin

clrscr;

readln(n,m);

if (ktnt(n)=true) then writeln(n,' la so nguyen to')

else writeln(n,' ko la so nguyen to');

dem:=0;

t:=0;

for i:=2 to n do

if (ktnt(i)=true) then

begin

write(i:4);

t:=t+i;

dem:=dem+1;

end;

writeln;

writeln(t,' ',dem);

t1:=0;

d1:=0;

for i:=n to m do

if ktnt(i)=true then

begin

write(i:4);

t1:=t1+i;

inc(d1);

end;

writeln;

writeln(t1,' ',d1);

readln;

end.

Đúng(0)

SQ

Suti Quang

7 tháng 12 2015 - olm

help me!nhanh nhất like^_^ Câu 2:Số nguyên tố lớn nhất có dạng 3a1 là ........Câu 3:Số tự nhiên nhỏ nhất có bốn chữ số khác nhau chia hết cho cả 2 và 3 là .....Câu 4:Hiệu của số lớn nhất có bốn chữ số khác nhau và số chẵn nhỏ nhất có bốn chữ số khác nhau là .......Câu 5:Biết rằng tổng của n số tự nhiên liên tiếp từ 1 đến n bằng 325.Khi đó n=........Câu 6:Số các số tự nhiên chia hết...

Đọc tiếp

#Toán lớp 6

3

DT

Đặng Thị Phương Thảo

7 tháng 12 2015

câu 3 : 1026

câu 4: 8852

Đúng(0)

C

CR7

7 tháng 12 2015

dai the nhin la het muon giai lun???

Đúng(0)

HN

Huy Nguyễn

20 tháng 3 2023

viết chương trình nhập vào N.Với 0<N<10

+in ra bang cửu chương N + cho biết N là số chẵn hay lẻ ? +Kiểm tra N có phải số nguyên tố hay ko

#Tin học lớp 8

2

NH

Nguyễn Hoàng Duy

20 tháng 3 2023

program BangCuuChuong;
var
N, i, j: integer;
IsEven: boolean;
IsPrime: boolean;
begin
write('Nhap N (0 < N < 10): ');
readln(N);

// Kiểm tra N có phải số chẵn hay lẻ
IsEven := (N mod 2 = 0);
if IsEven then
writeln(N, ' la so chan')
else
writeln(N, ' la so le');

// Kiểm tra N có phải số nguyên tố hay không
IsPrime := true;
if (N < 2) then
IsPrime := false
else
for i := 2 to trunc(sqrt(N)) do
if (N mod i = 0) then
begin
IsPrime := false;
break;
end;
if IsPrime then
writeln(N, ' la so nguyen to')
else
writeln(N, ' khong la so nguyen to');

// In ra bảng cửu chương N
writeln('Bang cuu chuong ', N, ':');
for i := 1 to 10 do
begin
j := i * N;
writeln(N, ' x ', i, ' = ', j);
end;

readln;
end.

Mấy cái phần mình gạch // là giải thích phần code đó làm gì nha.

Đúng(3)

ML

Minh Lệ

20 tháng 3 2023

Program HOC24;

var i,n,d: byte;

begin

write('Nhap N: '); readln(n);

writeln('Bang cuu chuong ',n,' : ');

for i:=1 to 10 do writeln(n,' x ',i,' = ',n*i);

if n mod 2=0 then writeln(n,' la so chan ') else writeln(n,' la so le');

d:=0;

for i:=1 to n do if n mod i=0 then d:=d+1;

if d=2 then write(n,' la so nguyen to') else write(n,' khong phai la so nguyen to');

readln

end.

Đúng(2)

E

Eliette

6 tháng 5 2021

MÌNH CẦN GẤP Ạ, MAI THI RỒI :(( 1. Viết chương trình tính tổng và tích các số chia hết cho 3 trong dãy số N. 2. Viết chương trình đếm xem trong dãy số N có bao nhiêu số chẵn và tính tổng các số chẵn đó. 3. Viết chương trình đếm có bao nhiêu số chẵn hoặc lẻ trong dãy số N rồi tính tổng và tích của các số chẵn và lẽ đó. Mong mọi người giúp mình...

Đọc tiếp

#Tin học lớp 8

3

NL

Nguyễn Lê Phước Thịnh

7 tháng 5 2021

Câu 1:

uses crt;

var a:array[1..100]of integer;

i,n,t,s:integer;

begin

clrscr;

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

for i:=1 to n do

begin

write('A[',i,']='); readln(a[i]);

end;

t:=0;

s:=1;

dem:=0;

for i:=1 to n do

if a[i] mod 3=0 then

begin

inc(dem);

t:=t+a[i];

s:=s*a[i];

end;

if dem=0 then writeln('Khong co so chia het cho 3 trong day')

else begin

writeln('Tong cac so chia het cho 3 la: ',t);

writeln('Tich cac so chia het cho 3 la: ',s);

end;

readln;

end.

Đúng(0)

NL

Nguyễn Lê Phước Thịnh

7 tháng 5 2021

Câu 2:

uses crt;

var a:array[1..100]of integer;

i,n,dem,t:integer;

begin

clrscr;

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

for i:=1 to n do

begin

write('A[',i,']='); readln(a[i]);

end;

dem:=0;

t:=0;

for i:=1 to n do

if a[i] mod 2=0 then

begin

inc(dem);

t:=t+a[i];

end;

writeln('So so chan la: ',dem);

writeln('Tong cac so chan la: ',t);

readln;

end.

Đúng(0)

Chúng tôi đề xuất

Tài nguyên

Ứng dụng mobile

Bảng xếp hạng

Các khóa học có thể bạn quan tâm

Yêu cầu VIP