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.

19 tháng 11 2019

Câu 1

HÀNG PHÍM GHI SỐ TỰ NHIÊN THỨ TỰ TRÊN XUỐNG DƯỚI
Hàng phím trên 2
Hàng phím cơ sở 3

Hàng phím số

1
Hàng phím chứa phím cách 5
Hàng phím dưới 4
3 tháng 5 2018

Ta chỉ cần vào INSERT=>TABLE cà chọn số ô cần vẽ và chỉnh sửa kích thước của các ô.

FUTURE - Số tương lai Dữ liệu vào: standard input Dữ liệu ra: standard output Giới hạn thời gian: 1.0 giây Giới hạn bộ nhớ: 512 megabyte Đăng bởi: kid2201 Số “tương lai” là số có các ước (không kể 1 và chính nó) là các số nguyên tố. VD: số 10 có ước là 2 và 5 là các số nguyên tố nên 10 là số “tương lai”. Yêu cầu: Cho dãy số nguyên (a1, a2, ..., an), 1 <= n <= 1000; với mọi i sao cho ai <=...
Đọc tiếp
FUTURE - Số tương lai Dữ liệu vào: standard input Dữ liệu ra: standard output Giới hạn thời gian: 1.0 giây Giới hạn bộ nhớ: 512 megabyte Đăng bởi: kid2201

Số “tương lai” là số có các ước (không kể 1 và chính nó) là các số nguyên tố. VD: số 10 có ước là 2 và 5 là các số nguyên tố nên 10 là số “tương lai”.

Yêu cầu: Cho dãy số nguyên (a1, a2, ..., an), 1 <= n <= 1000; với mọi i sao cho ai <= 10^6. Hãy cho biết trong dãy trên có bao nhiêu số tương lai.

Dữ liệu vào: Đọc từ file văn bản FUTURE.INP có cấu trúc như sau:

Dòng thứ nhất chứa số nguyên dương n.

Dòng thứ hai chứa n số nguyên a1, a2, ..., an.

Dữ liệu ra: Ghi ra file văn bản FUTURE.OUT ghi một số nguyên dương là số lượng các số tương lai. Các số trong file dữ liệu cách nhau ít nhất 1 dấu cách

Ví dụ

FUTURE.INP FUTURE.OUT

9

9 7 10 6 17 4 19 21 13

5

1
1 tháng 7 2021

 

program FUTURE;

var n,dem:int64;

a:array[1..1000000] of int64;

i,j:longint;

kt:boolean; 

function KTSNT(n:int64):boolean;

var i:longint;

kt:boolean;

begin

if n < 2 then KTSNT := false 

else begin  

kt := true; 

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

if n mod i = 0 then  

begin  

kt := false; 

break; 

end; 

if kt = true then KTSNT := true 

else KTSNT := false; 

end;

end; 

BEGIN 

readln(n);

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

dem := 0;

for i := 1 to n do 

begin

 if KTSNT(a[i]) then continue

else if a[i] = 1 then continue

else 

begin 

kt := true;

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

if a[i] mod j = 0 then 

if KTSNT(j) = false then 

begin 

kt := false;

break;

end;

end;

if kt = true then inc(dem);

end;

write(dem);

END.    

8 tháng 4 2017

C. Để thực hiện lấy ký tự "S" bạn sử dụng hàm =Mid(C1,2,1)

Giải thích ý nghĩa: Hàm này cho phép bạn lấy ra 1 ký tự từ vị trí ký tự thứ 2 trong ô C1.

Cú pháp hàm MID(text, start_num, num_chars). Trong đó:

  • Text: Chuỗi văn bản có chứa các ký tự mà bạn muốn trích xuất hoặc địa chỉ ô mà chứa chuỗi cần trích xuất. (tham số bắt buộc)

  • Start_num: Ví trí của ký tự thứ nhất mà bạn muốn trích xuất trong văn bản. Ký tự thứ nhất trong chuỗi văn bản có số bắt đầu là 1. (Tham số bắt buộc)

  • Num_chars: Số lượng ký tự mà bạn muốn hàm MID trả về từ văn bản. (Tham số bắt buộc)

21 tháng 4 2017

Về bài báo tường thì để bài báo thêm đẹp và dễ hiểu thôi

Còn về sinh học để chúng ta có thể hình dung được sự vật, có thể quan sát sự vật cần tìm hiểu và giúp cho bài giảng, bài học dễ tiếp thu hơn thôi

Nếu thấy trả lời hay, tick nha !!!