K
Khách

Hãy nhập câu hỏi của bạn vào đây, nếu là tài khoản VIP, bạn sẽ được ưu tiên trả lời.

17 tháng 3 2023

Program HOC24;

var p,q,i,d: integer;

begin

write('Nhap p: '); readln(p);

write('Nhap q: '); readln(q);

d:=0;

for i:=p to q do if sqr(trunc(sqrt(i))) = i then d:=d+1;

write('Co ',d,' so chinh phuong');

readln

end.

25 tháng 12 2020

uses crt;

var i,n,dem:integer;

begin

clrscr;

repeat

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

until n>0;

writeln('Cac so chan va chia het cho 4 trong khoang tu 5 toi ',n,' la: ');

for i:=5 to n do 

  if (i mod 2=0) and (i mod 7=0) then write(i:4);

writeln;

writeln('Cac so chia het cho 7 trong khoang tu 5 toi ',n,' la: ');

dem:=0;

for i:=5 to n do 

  if i mod 7=0 then 

   begin

write(i:4);

inc(dem);

end;

writeln;

writeln('Co ',dem,' so chia het cho 7 trong khoang tu 5 toi ',n);

readln;

end.

15 tháng 3 2020

đặt \(p^{2m}+q^{2m}=a^2\)

Xét p,q cùng lẻ thì \(p^{2m}\)chia 4 dư 1 ; \(q^{2m}\)chia 4 dư 1

\(\Rightarrow p^{2m}+q^{2m}\)chia 4 dư 2

\(\Rightarrow a^2\)chia 4 dư 2 ( vô lí vì SCP chia 4 ko thể dư 2 hoặc 3 )

\(\Rightarrow\)ít nhất 1 trong 2 số p,q có 1 số bằng 2

giả sử p = 2

\(\Rightarrow4^m=a^2-q^{2n}=\left(a-q^n\right)\left(a+q^n\right)\)

\(\Rightarrow\hept{\begin{cases}a-q^n=4^x\\a+q^n=4^y\end{cases}\Rightarrow2.q^n=4^y-4^x⋮4}\)

\(\Rightarrow q^n⋮2\)

\(\Rightarrow q⋮2\)

\(\Rightarrow q=2\)

Thay p = q = 2 vào, ta được :

\(4^m+4^n=a^2\)

giả sử \(m\ge n\)

Đặt \(m=n+z\)

Ta có : \(4^{n+z}+4^n=4^n\left(4^z+1\right)=a^2\)

vì \(4^n\)là số chính phương nên \(4^z+1\)là số chính phương

Dễ thấy \(4^z+1=\left(2^z\right)^2+1\)không là số chính phương nên suy ra phương trình vô nghiệm

24 tháng 3 2020

Đáp số nè: m=2, n=1, p=2, q=3 và các hoán vị.

Nếu ai cần thì cứ nhắn tin vs mik nha.

26 tháng 6 2023

chịu

 

Python:

n=int(input("Nhap so nguyen duong n:"))

dem=0

for i in range(1,n+1):

 if i%4==0:

  dem=dem+1

print(dem)

7 tháng 11 2021

Program tinh_tong;

uses crt;

var a,b:Integer;

begin

Write('Nhap gia tri a: ');

Readln(a);

Write('Nhap gia tri b: ');

Readln(b);

Writeln('Tong: ',a+b);

Readln();

end.

23 tháng 7 2018

a) Gọi 4 số tự nhiên liên tiếp đó là: n ; n+1; n+2; n+3 (n thuộc N)

Ta có: \(n\left(n+1\right)\left(n+2\right)\left(n+3\right)+1=n\left(n+3\right)\left(n+1\right)\left(n+2\right)+1\)

    \(=\left(n^2+3n\right)\left(n^2+3n+2\right)+1\left(\cdot\right)\)

Đặt n2 + 3n = t (t thuộc N) thì \(\left(\cdot\right)=t\left(t+2\right)+1=t^2+2t+1=\left(t+1\right)^2=\left(n^2+3n+1\right)^2\)

Vì n thuộc N nên (n2+3n+1) thuộc N

=> Vậy n(n+1)(n+2)(n+3)+1 là 1 số chính phương

24 tháng 7 2018

tính giá trị của biểu thức 

a, 2x^2(ax^2+2bx+4c)=6x^4-20x^3-8x^2 với mọi x

b, (ax+b)(x^2-cx+2)=x^3+x^2-2 với mọi x

11 tháng 1 2023

const
fi='sochinhphuong.inp';
fo='sochinhphuong.out';
var f,g:text;n:longint;
function scp(n:longint):boolean;
begin
        if (sqr(trunc(sqrt(n)))=n) then exit (true);
        exit (false);
end;
begin
        assign(f,fi);reset(f);
        assign(g,fo);rewrite(g);
        readln(f,n);
        if scp(n) then writeln(g,'yes') else
        writeln(g,'no');
        close(f);close(g);
end.

5 tháng 5 2017

Gọi hai phân số cần tìm là a/b và c/d

Ta có : a/b : c/d = 10/21

           a/b x d/c = 10/21

=> a x d = 10k và b x c = 21k ( k e N*)

Thử chọn ta có k = { 1, 2, 3 }

Nếu k = 1 

thì a x d = 10 mà 10 = 2 x 5

     b x c = 21 mà 21 = 3 x 7

=> ( a/b ; c/d ) = 2/3 và 7/5, 2/7 và 3/5, 5/3 và 7/2, 5/7 và 3/2

Tương tự bạn hãy thử chọn k = 2 và 3 để tìm ra a/b với c/d nhé