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.

Số nguyên tố là số chỉ có 2 ước là 1 và chính nó. Số 2; 3; 5; 7 là các số nguyên tố nhỏ nhất                                                                           Hợp số là số có nhiều hơn 2 ước.                                                                                                                                                                       Muốn phân biệt được số nguyên tố và hợp số ta phải:                                                                                                                              - ---  -Thuộc lòng dấu hiệu chia hết cho 2; 3; 5; 7                                                                                                                                                                                  

Số nguyên tố là số tự nhiên lớn hơn 1 không phải là tích của hai số tự nhiên nhỏ hơn. Nói cách khác, số nguyên tố là những số chỉ có đúng hai ước số là 1 và chính nó. Các số tự nhiên lớn hơn 1 không phải là số nguyên tố được gọi là các hợp số.

mẹ biết mẹ buồn đó nha

Bài 1: Tìm x, y thuộc Z sao cho:

Bài 2: Tính:

Bài 3: Tìm x thuộc Z sao cho:

Bài 4: Tìm x + y, biết rằng: |x| = 5 và |y| = 7.

Bài 1 (1,5 đểm ): tìm điều kiện của x để biểu thức sau có nghĩa :

a)      

b)      

c)      

d)     

Bài 2 (3  đểm): tính

a)      

b)      

c)      

d)     

Bài 3 (2,5  đểm) : giải phương trình :

a)      

b)      

c)      

Bài 4 (3  đểm) : Cho biểu thức

 với x > 0; x ≠ 1; x ≠ 4

a)      rút gọn M

b)      tính giá trị của M khi x = 2.

c)      Tìm x để M > 0.

chị ơi em mới học lớp 6 à

uses crt;

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

i,n,k,dem:integer;

begin

clrscr;

readln(n);

for i:=1 to n do readln(a[i]);

readln(k);

dem:=0;

for i:=1 to n do

if a[i]>k then inc(dem);

write(dem);

readln;

end.

python hay pascal

program countGreaterThanK;
var
  A: array[1..100] of integer;
  N, K, count: integer;
  i: integer;
begin
  write('Nhap so phan tu cua day A (<=100): ');
  readln(N);
  write('Nhap gia tri K: ');
  readln(K);
  count := 0;
  for i := 1 to N do
  begin
    write('Nhap phan tu thu ', i, ' cua day A: ');
    readln(A[i]);
    if A[i] > K then
      count := count + 1;
  end;
  writeln('So phan tu co gia tri lon hon K la: ', count);
end.

Cái này mình viết chương trình chính thôi, bạn tự viết ctc nhé

Câu 1: 

uses crt;

var n,i,s:longint;

begin

clrscr;

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

s:=1;

for i:=1 to n do

 s:=s*i;

writeln(s);

readln;

end.

Câu 2: 

uses crt;

var st:string;

i,d:integer;

begin

clrscr;

write('Nhap xau:'); readln(st);

d:=length(st);

for i:=d downto 1 do 

  write(st[i]);

readln;

end.

Câu 3: 

uses crt;

var n:integer;

st:string;

begin

clrscr;

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

str(n,st);

writeln('So ',n,' co ',length(st),' chu so');

readln;

end.

Gọi  \(d=ƯCLN\left(n+2;3n+5\right)\)

\(\Rightarrow\hept{\begin{cases}n+2⋮d\\3n+5⋮d\end{cases}}\Rightarrow\hept{\begin{cases}3\left(n+2\right)⋮d\\3n+5⋮d\end{cases}}\Rightarrow\hept{\begin{cases}3n+6⋮d\\3n+5⋮d\end{cases}}\)

\(\Rightarrow\left(3n+6\right)-\left(3n+5\right)⋮d\)

\(\Rightarrow1⋮d\Rightarrow d=1\)

Do đó: ƯCLN(n + 2; 3n + 5) = 1

Vậy hai số n + 2 và 3n + 5 là hai số nguyên tố cùng nhau.

Học tốt nhé ^3^

Gọi ƯCLN(n + 2, 3n + 5) là d (d thuộc N*)

Ta có  n + 2 chia hết cho d

           3n + 5 chia hết cho d

=>       3(n + 2) chia hết cho d

           3n + 5 chia hết cho d

=>       3n + 6 chia hết cho d

           3n + 5 chia hết cho d

=> (3n + 6) - (3n + 5) chia hết cho d

=> 1 chia hết cho d

=> d thuộc Ư(1)

Ư(1) = {1}

=> d = 1 

=>  ƯCLN (n+2, 3n + 5) = 1

 Vậy n + 2 và 3n + 5 là hai số nguyên tố cùng nhau

(Mik nghĩ vậy tại mik ko nhớ cho lắm)

Hok tốt

cảm ơn mọi người nhiều

Trong ba lần kháng chiến chống quân Mông - Nguyên, Trần Quốc Tuấn đã có nhiều đóng góp to lớn, có thể kể như:

- Là vị chỉ huy quân đội, lãnh đạo tối cao cùng với các vua Trần.

- Đưa ra những chủ trương kế sách đúng đắn, là điều kiện tiên quyết dẫn đến thắng lợi của các cuộc kháng chiến.

- Là người huấn luyện quân đội, khích lệ tinh thần các chiến sĩ thông qua việc soạn thảo “Hịch tướng sĩ”.

- Là tác giả của các bộ binh thư nổi tiếng: Binh thư yếu lược, Vạn kiếp tông bí truyền thư.

- Trần Quốc Tuấn còn bỏ qua các hiềm khích, thù riêng, nêu cao tinh thần yêu nước, vì nghĩa lớn.