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.

16 tháng 9 2021

Em vẫn trả lời bình thường , đăng ảnh bình thường

16 tháng 9 2021

chắc bị lỗi hoc24 đó! lúc nãy e gửi câu hỏi mà ko đc!

uses crt;

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

i,n,dem,dem1,kt,j:integer;

begin

clrscr;

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

for i:=1 to n do 

  begin

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

end;

dem:=0;

for i:=1 to n do 

  if sqrt(a[i])=trunc(sqrt(a[i])) then 

begin

inc(dem);

b[dem]:=a[i];

end;

dem1:=0;

for i:=1 to n do

  if a[i]>1 then

begin

kt:=0;

for j:=2 to trunc(sqrt(a[i])) do 

  if a[i] mod j=0 then kt:=1;

if kt=0 then 

begin

inc(dem1);

c[dem1]:=a[i];

end;

end;

if dem=0 then writeln('Trong day khong co so chinh phuong')

else begin

writeln('Cac so chinh phuong trong day la: ');

for i:=1 to dem do 

  write(b[i]:4);

end;

if dem1=0 then writeln('Trong day khong co so nguyen to')

else begin

writeln('Cac so nguyen to trong day la: ');

for i:=1 to dem1 do 

  write(c[i]:4);

end;

readln;

end.

14 tháng 12 2020

Bạn vào trang cá nhân của mình ấn vào dấu + mình đã khoanh và ấn vào biểu tượng máy ảnh, sau đó nhấp tiếp lên màn hình và để chọn ảnh bạn muốn thay đổi nhé

undefined

14 tháng 12 2020

nhưng khi đổi xong em kéo xuống dưới một chút thì lại trở về như ban đầu

24 tháng 5 2021

Tham khảo:

- Ta nên sử dụng nhiều hiệu ứng động trong một bài trình chiếu
- Vì:  Với phần mềm trình chiếu nói chung,PowerPoint nói riêng ,em hoàn toàn có thể tạo được bài trình chiếu và sử dụng theo cách đó .Hơn nữa ,em còn có thể tạo một trang chiếu với đầy đủ thông tin (thay vì ba trang chiếu )và sử dụng các hiệu ứng động để trình chiếu dần từng nội dung .Ngoài ra ,các hiệu ứng động phong phú cũng góp thêm phần sự chú ý của người nghe.

uses crt;

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

i,n,kt,dem,j:integer;

begin

clrscr;

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

for i:=1 to n do 

  begin

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

end;

dem:=0;

for i:=1 to n do 

  if a[i]>1 then

begin

kt:=0;

for j:=2 to a[i]-1 do 

  if a[i] mod j=0 then kt:=1;

if kt=0 then 

begin

inc(dem);

b[dem]:=a[i];

end;

end;

if dem=0 then writeln('Khong co so nguyen to trong day')

else begin

writeln('Cac so nguyen to trong day la: ');

for i:=1 to dem do 

  write(b[i]:4);

end;

readln;

end. 

10 tháng 2 2020

Gợi ý nè: bạn tìm trên mạng hoặc vào mấy app học tập như học 247,lazi,... là tìm đc.

24 tháng 5 2021

nên sử dụng nhiều hiệu ứng động trong một bài trình chiếu
vì với phần mềm trình chiếu nói chung,PowerPoint nói riêng ,em hoàn toàn có thể tạo được bài trình chiếu và sử dụng theo cách đó .Hơn nữa ,em còn có thể tạo một trang chiếu với đầy đủ thông tin (thay vì ba trang chiếu )và sử dụng các hiệu ứng động để trình chiếu dần từng nội dung .Ngoài ra ,các hiệu ứng động phong phú cũng góp thêm phần sự chú ý của người nghe