Viết Chương Trình Kiểm Tra Số Tự Nhiên N Xem Có Phải N Là Số Chính ...

HOC24

Lớp học Học bài Hỏi bài Giải bài tập Đề thi ĐGNL Tin tức Cuộc thi vui Khen thưởng
  • Tìm kiếm câu trả lời Tìm kiếm câu trả lời cho câu hỏi của bạn
Đóng Đăng nhập Đăng ký

Lớp học

  • Lớp 12
  • Lớp 11
  • Lớp 10
  • Lớp 9
  • Lớp 8
  • Lớp 7
  • Lớp 6
  • Lớp 5
  • Lớp 4
  • Lớp 3
  • Lớp 2
  • Lớp 1

Môn học

  • Toán
  • Vật lý
  • Hóa học
  • Sinh học
  • Ngữ văn
  • Tiếng anh
  • Lịch sử
  • Địa lý
  • Tin học
  • Công nghệ
  • Giáo dục công dân
  • Tiếng anh thí điểm
  • Đạo đức
  • Tự nhiên và xã hội
  • Khoa học
  • Lịch sử và Địa lý
  • Tiếng việt
  • Khoa học tự nhiên
  • Hoạt động trải nghiệm
  • Hoạt động trải nghiệm, hướng nghiệp
  • Giáo dục kinh tế và pháp luật

Chủ đề / Chương

Bài học

HOC24

Khách Khách vãng lai Đăng nhập Đăng ký Khám phá Hỏi đáp Đề thi Tin tức Cuộc thi vui Khen thưởng
  • Tất cả
  • Toán
  • Vật lý
  • Hóa học
  • Sinh học
  • Ngữ văn
  • Tiếng anh
  • Lịch sử
  • Địa lý
  • Tin học
  • Công nghệ
  • Giáo dục công dân
  • Tiếng anh thí điểm
  • Hoạt động trải nghiệm, hướng nghiệp
  • Giáo dục kinh tế và pháp luật
Hãy tham gia nhóm Học sinh Hoc24OLM Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài

Câu hỏi

Hủy Xác nhận phù hợp Chọn lớp Tất cả Lớp 12 Lớp 11 Lớp 10 Lớp 9 Lớp 8 Lớp 7 Lớp 6 Lớp 5 Lớp 4 Lớp 3 Lớp 2 Lớp 1 Môn học Toán Vật lý Hóa học Sinh học Ngữ văn Tiếng anh Lịch sử Địa lý Tin học Công nghệ Giáo dục công dân Tiếng anh thí điểm Đạo đức Tự nhiên và xã hội Khoa học Lịch sử và Địa lý Tiếng việt Khoa học tự nhiên Hoạt động trải nghiệm Hoạt động trải nghiệm, hướng nghiệp Giáo dục kinh tế và pháp luật Mới nhất Mới nhất Chưa trả lời Câu hỏi hay Nguyễn Việt Anh
  • Nguyễn Việt Anh
24 tháng 11 2017 lúc 21:47

Viết chương trình kiểm tra số tự nhiên N xem có phải N là số chính phương không? (Pascal)

Ai trả lời hộ mình với!!!!!

Xem chi tiết Lớp 6 Tin học Soạn thảo văn bản 3 0 Khách Gửi Hủy nguyễn thảo trang nguyễn thảo trang 25 tháng 11 2017 lúc 18:13

#include <stdio.h>

#include <math.h>

int main() {

int n,a;

printf("Nhap vao so nguyen duong: ");

scanf("%d", &n);

if(n>0)

{

a=sqrt(n);

if((a*a)==n)

printf("So ban da nhap vao la so chinh phuong");

else

printf("So ban da nhap vao ko phai la so chinh phuong");

Đúng 0 Bình luận (1) Khách Gửi Hủy Minh Lệ Minh Lệ 8 tháng 11 2019 lúc 14:13

var n: longint;

function cp(x: longint): boolean;

begin

cp:=false;

if x<0 then exit;

if x=sqr(trunc(sqrt(x))) then cp:=true;

end;

begin

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

if cp(n) then write('Day la so chinh phuong') else write('Khong phai so chinh phuong');

readln

end.

Đúng 0 Bình luận (0) Khách vãng lai đã xóa Khách Gửi Hủy Minh Lệ Minh Lệ 18 tháng 11 2019 lúc 18:30

Program hotrotinhoc;

var n: longint;

function cp(x: longint): boolean;

begin

cp:=false;

if x<0 then exit;

if x=sqr(trunc(sqrt(x))) then cp:=true;

end;

begin

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

if cp(n) then write('Day la so chinh phuong') else write('Khong phai so chinh phuong');

readln

end.

Đúng 0 Bình luận (0) Khách vãng lai đã xóa Khách Gửi Hủy Minh Lệ
  • Vận dụng 1
SGK Kết nối tri thức với cuộc sống - Trang 122 17 tháng 7 2023 lúc 19:04

Sử dụng phương pháp làm mịn dần để giải bài toán sau: Cho trước số tự nhiên không âm n, viết chương trình kiểm tra xem số n có phải là số nguyên tố hay không? Chương trình cần thông báo "CÓ" nếu n là số nguyên tế, ngược lại thông báo "KHÔNG".

Xem chi tiết Lớp 11 Tin học Bài 26: Phương pháp làm mịn dần trong thiết kế chư... 1 0 Khách Gửi Hủy Thanh An Thanh An 18 tháng 7 2023 lúc 20:43

THAM KHẢO!

def is_prime(n):

 if n <= 1:

  return "KHÔNG"# Trường hợp n <= 1 không phải số nguyên tố

 elif n <= 3:

  return "CÓ"# Trường hợp n = 2 hoặc n = 3 là số nguyên tố

 elif n % 2 == 0:

  return "KHÔNG"# Trường hợp n chẵn lớn hơn

  Đúng 1 Bình luận (0) Khách Gửi Hủy Đỗ Trọng TÍn
  • Đỗ Trọng TÍn
28 tháng 4 2023 lúc 20:29 híc sắp thi rồi giúp em với ạ plssssssssscâu hỏi gồm 3 câu ạcâu 1:viết chương trình nhập 1 số tự nhiên N và kiểm tra xem N có là số hoàn hảo không? (số hoàn hảo là số có tổng các ước tự nhiên nhỏ hơn nó bằng chính nó)câu 2:viết chương trình nhập 1 số nguyên N và kiểm tra xem N có là số nguyên tố khôngcâu 3: viết chương trình nhập 1 mảng A gồm N số nguyên và xuất ra màn hình số nhỏ nhất trong mảngĐọc tiếp

híc sắp thi rồi giúp em với ạ plssssssssscâu hỏi gồm 3 câu ạcâu 1:viết chương trình nhập 1 số tự nhiên N và kiểm tra xem N có là số hoàn hảo không? (số hoàn hảo là số có tổng các ước tự nhiên nhỏ hơn nó bằng chính nó)câu 2:viết chương trình nhập 1 số nguyên N và kiểm tra xem N có là số nguyên tố khôngcâu 3: viết chương trình nhập 1 mảng A gồm N số nguyên và xuất ra màn hình số nhỏ nhất trong mảng

Xem chi tiết Lớp 8 Công nghệ Ôn tập cuối năm 0 0 Khách Gửi Hủy Vu Hoang Anh
  • Vu Hoang Anh
10 tháng 2 2022 lúc 15:14

viết chương trình nhập vào 1 số tự nhiên kiểm tra xem n có phải là số nguyên tố hay khong

Xem chi tiết Lớp 8 Tin học 2 0 Khách Gửi Hủy ღღղցմվễղ Եհíệղ cհíղհ๖ۣۜঌ ღღղցմվễղ Եհíệղ cհíղհ๖ۣۜঌ 10 tháng 2 2022 lúc 16:03

#include <bits/stdc++.h>using namespace std;bool ktsnt(long long n){    long long i;if(n<2) return false;    else    {        for(i=2;i<=sqrt(n);i++)            if(n%i==0)            return false;        return true;    }}long long cnt;int main(){ios_base::sync_with_stdio(0);cin.tie(0); cout.tie(0);cin>>cnt;if(ktsnt(cnt)==true)    cout<<"YES";else    cout<<"NO";return 0;}

 

Đúng 0 Bình luận (0) Khách Gửi Hủy Kiều Vũ Linh Kiều Vũ Linh 10 tháng 2 2022 lúc 16:23

var i,n,dem:integer;

begin

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

for i:=1 to n do

begin

if n mod i = 0 then dem:=dem+1;

end;

if dem = 2 then write(n,' la so nguyen to')

else write(n,' khong la so nguyen to');

readln;

end.

 

Đúng 0 Bình luận (0) Khách Gửi Hủy Kamato Heiji
  • Kamato Heiji
18 tháng 12 2020 lúc 17:03

Viết thuật toán và viết chương trình : Nhập vào một số kiểm tra xem số đó có phải là số chính phương hay không

Xem chi tiết Lớp 8 Tin học Lập trình đơn giản 1 0 Khách Gửi Hủy Nguyễn Lê Phước Thịnh Nguyễn Lê Phước Thịnh CTV 18 tháng 12 2020 lúc 17:10

Thuật toán: 

-Bước 1: Nhập n

-Bước 2: Nếu \(\sqrt{n}=trunc\left(\sqrt{n}\right)\) thì n là số chính phương

không thì n không phải là số chính phương

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

Viết chương trình

uses crt;

var n:integer;

begin

clrscr;

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

if n<0 then writeln(n,' khong la so chinh phuong')

else begin

             if sqrt(n)=trunc(sqrt(n)) then writeln(n,' la so chinh phuong')

             else writeln(n,' khong la so chinh phuong');

       end;

readln;

end.

Đúng 4 Bình luận (2) Khách Gửi Hủy Phú Nhuận Nguyễn
  • Phú Nhuận Nguyễn
16 tháng 3 2021 lúc 21:28

viết chương trình nhập vào số tự nhiên n từ bàn phím và kiểm tra n có phải là số hoàn chỉnh không (Số hoàn chỉnh là 1 số có tổng các ước nhỏ hơn nó bằng chính nó).

Xem chi tiết Lớp 8 Tin học 2 0 Khách Gửi Hủy Nguyễn Lê Phước Thịnh Nguyễn Lê Phước Thịnh CTV 16 tháng 3 2021 lúc 21:33

uses crt;

var n,i,t:integer;

begin

clrscr;

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

t:=0;

for i:=1 to n-1 do 

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

if t=n then writeln(n,' la so hoan chinh')

else writeln(n,' khong la so hoan chinh');

readln;

end.

Đúng 2 Bình luận (0) Khách Gửi Hủy Hưng Lê Hưng Lê 6 tháng 11 2021 lúc 13:58

program hoan_chinh;

uses crt;

var n,i,s:integer;

begin

clrscr;

write('nhap n:');readln(n);

for i:=1 to n-1 do

 begin

 if n mod i = 0 then s:=s+i;

 end;

if s=n then writeln('1') {n là số chính phương thì viết 1}

else writeln('0');{n không là số chính phương thì viết 0}

end.

Đúng 1 Bình luận (0) Khách Gửi Hủy Phú Nhuận Nguyễn
  • Phú Nhuận Nguyễn
16 tháng 3 2021 lúc 21:21

viết chương trình nhập vào số tự nhiên n và kiểm tra n có phải là số hoàn chỉnh không

Xem chi tiết Lớp 8 Tin học Bài 8. Lặp với số lần chưa biết trước 1 0 Khách Gửi Hủy Nguyễn Lê Phước Thịnh Nguyễn Lê Phước Thịnh CTV 16 tháng 3 2021 lúc 21:33

uses crt;

var n,i,t:integer;

begin

clrscr;

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

t:=0;

for i:=1 to n-1 do 

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

if t=n then writeln(n,' la so hoan chinh')

else writeln(n,' khong la so hoan chinh');

readln;

end.

Đúng 1 Bình luận (0) Khách Gửi Hủy T Đạt
  • T Đạt
29 tháng 3 2023 lúc 15:56

viết chương trình nhập số tự nhiên N từ bàn phím , kiểm tra số N đó có phải là số nguyên tố không ?

Xem chi tiết Lớp 8 Tin học 2 0 Khách Gửi Hủy Phong Phong CTV 29 tháng 3 2023 lúc 16:00

Uses crt;

var n,i,z: integer;

begin clrscr;

readln(n);

for i:=1 to n do if(n mod i=0) then z:=z+1;

if(z=2) then writeln(z,' la so nguyen to')

else writeln(z,' khong phai la so nguyen to');

readln;

end.

Đúng 0 Bình luận (0) Khách Gửi Hủy Nguyễn Hoàng Duy Nguyễn Hoàng Duy 29 tháng 3 2023 lúc 23:45

program PrimeNumber;

uses crt;

var  N, i: integer;  isPrime: boolean;

begin  clrscr;  write('Enter N: ');  readln(N);

  if N <= 1 then  begin    writeln('N is not a prime number');  end  else  begin    isPrime := true;    for i := 2 to trunc(sqrt(N)) do    begin      if N mod i = 0 then      begin        isPrime := false;        break;      end;    end;

    if isPrime then    begin      writeln('N is a prime number');    end    else    begin      writeln('N is not a prime number');    end;  end;

  readln;end.

Đúng 0 Bình luận (0) Khách Gửi Hủy Lê Huỳnh Nhân
  • Lê Huỳnh Nhân
26 tháng 2 2023 lúc 20:26

1)viết chương trình xuất ra các bội số của B trong phạm vị từ 1 đến N, với giá trị B, N được nhập vào từ bàn phím

2) nhập số nguyên n, viết chương trình xem số n có phải là số nguyên tố không

3)viết chương trình kiểm tra C có phải số hoàn hảo hay không

Xem chi tiết Lớp 8 Tin học 1 0 Khách Gửi Hủy Nguyễn Lê Phước Thịnh Nguyễn Lê Phước Thịnh CTV 28 tháng 2 2023 lúc 22:56

2:

#include <bits/stdc++.h>

using namespace std;

int main()

{

int n,i,kt=0;

cin>>n;

for (int i=2; i*i<=n; i++)

if (n%i==0) kt=1;

if (kt==0) cout<<"YES";

else cout<<"NO";

}

Đúng 0 Bình luận (0) Khách Gửi Hủy Reki
  • Reki
15 tháng 5 2021 lúc 13:49

viết chương trình pascal tính tổng của n số tự nhiên.  ...Mình cần câu trả lời gấp ạ ,t2 thi rồiii, chính xác nữa được ko ạ!!!!! Mik cảm ơn trc

Xem chi tiết Lớp 8 Tin học 2 0 Khách Gửi Hủy Nguyễn Lê Phước Thịnh Nguyễn Lê Phước Thịnh CTV 15 tháng 5 2021 lúc 18:54

uses crt;

var i,n,t:integer;

begin

clrscr;

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

t:=0;

for i:=1 to n do 

t:=t+i;

writeln(t);

readln;

end.

Đúng 1 Bình luận (0) Khách Gửi Hủy Trúc Giang Trúc Giang 15 tháng 5 2021 lúc 14:00

n stn hay n stn đầu tiên vậy bạn ?

Đúng 1 Bình luận (0) Khách Gửi Hủy

Từ khóa » Hàm Số Chính Phương Trong Pascal