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.

1.Số học sinh trường THCS Đông Mỹ tham gia học tập ngoại khóa tại làng dóm – Sóc Sơn – Hà Nội năm học 2019-2020 là N (0<N<1000). In ra màn hình các kết quả sau, mỗi kết quả trên một dòng. - Dòng 1:Tổng các chữ số của N. - Dòng 2:Các số nguyên tố nhỏ hơn tổng các chữ số của N. - Dòng 3:Tổng các số nguyên tố trong dòng 2 2.Cho hai số nguyên dương A và B thỏa mãn (20=<A<=50, 30<=B<=75).Bằng ngôn ngữ lập trình em hãy...
Đọc tiếp

1.Số học sinh trường THCS Đông Mỹ tham gia học tập ngoại khóa tại làng dóm – Sóc
Sơn – Hà Nội năm học 2019-2020 là N (0<N<1000). In ra màn hình các kết quả sau, mỗi
kết quả trên một dòng.
- Dòng 1:Tổng các chữ số của N.
- Dòng 2:Các số nguyên tố nhỏ hơn tổng các chữ số của N.
- Dòng 3:Tổng các số nguyên tố trong dòng 2

2.Cho hai số nguyên dương A và B thỏa mãn (20=<A<=50, 30<=B<=75).Bằng ngôn
ngữ lập trình em hãy in ra màn hình các kết quả sau.
- Dòng 1: Các số có hai chữ số chia hết cho 9.
- Dòng 2: Các số chính phương lớn hơn A và nhỏ hơn B.
- Dòng 3: Số nguyên tố lớn nhất nhỏ hơn B.

3.Nhập từ bàn phím một số nguyên dương N (0<N<105
). Em hãy dùng ngôn ngữ lập
trình in ra màn hình các kết quả sau, mỗi kết quả trên một dòng.
- Dòng 1: Số lượng các chữ số của N.
- Dòng 2: Tổng các chữ số của N.
- Dòng 3: Phân số tối giản của N và số đảo ngược của N.

4

Bài 1:

uses crt;
var n,d,t,x,y,j,kt,i,t1,dem:integer;
st:string;
a:array[1..255]of integer;
begin
clrscr;
write('n='); readln(n);
if (0<n) and (n<1000) then
begin
{------------------------dong-1---------------------------}
str(n,st);
d:=length(st);
t:=0;
for i:=1 to d do
begin
val(st[i],x,y);
t:=t+x;
end;
writeln('tong cac chu so cua ',n,' la: ',t);
{----------------------dong-2----------------------------}
writeln('cac so nguyen to nho hon tong cac chu so cua ',n,' la: ');
dem:=0;
for i:=2 to t-1 do
begin
kt:=0;
for j:=2 to i-1 do
if i mod j=0 then kt:=1;
if kt=0 then
begin
write(i:4);
dem:=dem+1;
a[dem]:=i;
end;
end;
{----------------dong-3---------------------------}
writeln;
t1:=0;
for i:=1 to dem do
t1:=t1+a[i];
writeln('tong cac so nguyen to trong dong 2 la: ',t1);
end
else writeln('vui long nhap lai');
readln;
end.

Bài 2:

uses crt;
var a,b,i,dem,j,kt:integer;
c:array[1..100]of integer;
begin
clrscr;
write('a='); readln(a);
write('b='); readln(b);
if (20<=a) and (a<=50) and (30<=b) and (b<=75) then
begin
{------------------------dong-1--------------------------}
writeln('cac so co 2 chu so chia het cho 9 la:');
for i:=10 to 99 do
if i mod 9=0 then write(i:4);
{-----------------------dong-2--------------------------}
writeln;
writeln('cac so chinh phuong lon hon ',a,' va nho hon ',b,' la: ');
for i:=a+1 to b-1 do
if trunc(sqrt(i))=sqrt(i) then write(i:4);
{-----------------------dong-3---------------------------}
writeln;
dem:=0;
for i:=2 to b do
begin
kt:=0;
for j:=2 to i-1 do
if i mod j=0 then kt:=1;
if kt=0 then
begin
inc(dem);
c[dem]:=i;
end;
end;
writeln('so nguyen to lon nhat nho hon ',b,' la: ',c[dem]);
end
else writeln('vui long nhap lai');
readln;
end.

Bài 3:

uses crt;
var n,d,t,i,x,y:integer;
st:string;
begin
clrscr;
write('n='); readln(n);
if (0<n) and (n<105) then
begin
{---------------------------dong-1---------------------------}
str(n,st);
d:=length(st);
writeln('so luong cac chu so cua ',n,' la: ',d);
{---------------------------dong-2--------------------------}
t:=0;
for i:=1 to d do
begin
val(st[i],x,y);
t:=t+x;
end;
writeln('tong cac chu so cua ',n,' la: ',t);
{---------------------------dong-3------------------------}
writeln('phan so toi gian cua ',n,' la: 1/',n);
write('so dao nguoc cua ',n,' la: ');
for i:=d downto 1 do
write(st[i]);
end
else writeln('vui long nhap lai');
readln;
end.

31 tháng 3 2020

Câu 1:

Program hotrotinhoc;

var i,tog,n: integer;

function tong(x: integer): integer;

var k,t: longint;

begin

t:=0;

while x<>0 do

begin

k:=x mod 10;

t:=t+k;

x:=x div 10;

end;

tong:=t;

end;

function nt(a: integer): boolean;

var j: integer;

begin

nt:=true;

if (a=2) or (a=3) then exit;

nt:=false;

if (a=1) or (a mod 2=0) or (a mod 3=0) then exit;

j:=5;

while (j<=trunc(sqrt(a))) do

begin

if (a mod j=0) or (a mod (j+2)=0) then exit;

j:=j+6;

end;

nt:=true;

end;

begin

write('Nhap so nguyen N :'); readln(n);

writeln('Tong cac chu so cua N la :',tong(n));

write('Cac so nguyen to nho hon tong cac chu so cua N la :');

for i:=1 to tong(n) do if nt(i) then

begin

write(i,' ');

tog:=tog+i;

end;

writeln;

write('Tong cac so nguyen to trong dong 2 la :',tog);

readln

end.

4 tháng 5 2020

Nếu thấy đúng nhớ tick giúp mình nhé!

3 tháng 5 2020

Câu 1:

- Nút lệnh dùng để ngắt trang là: Page Break Preview

- Nút lệnh để sắp xếp theo thứ tự giảm dần là: Bài 8: Sắp xếp và lọc dữ liệu

Câu 2:

Để lọc dữ liệu, ta sử dụng nút lệnh: Data/Filter

Câu 3:

Bài 8: Sắp xếp và lọc dữ liệu tăng chữ số thập phân

Bài 8: Sắp xếp và lọc dữ liệu giảm chữ số thập phân

Câu 4:

a) Đặt hướng giấy in

Bước 1: Page Layout/Page Setup/Nháy chọn mũi tên góc dưới bên phải

Bước 2: Xuất hiện hộp thoại Page Setup/ Page

+ Portrail: chọn hướng in dọc

+ Lanscape: chọn hướng in ngang

- Page size: chọn khổ giấy

b) Đặt lề trang in

Bước 1: Page Layout/Page Setup/Nháy chọn mũi tên góc dưới bên phải

Bước 2: Trong hộp thoại Page Setup/Margins

+ Left: Lề trái

+ Right: Lề phải

+ Bottom: Lề dưới

+ Top: Lề trên

+ Header: Đầu trang

+ Footer: Chân trang

Câu 5: Vào bảng chọn Data → Filter→ xóa đánh dấu Auto Filter.

Chúc bạn học tốt!

3 tháng 1 2018

Chuong trìh bảg tíh là phàn men đk thiet ke giup gi lai va tring bay thong tin duoi dag bag thuc hien tíh toan cx nhu xay dựg bieu đồ bieu diễn 1 cách trực quan các só lieu có trog bang

Tren Ex có là

Thanh cog thuc: nhap cog thuc hien thu du lieu

Bang chon data (du lieu): chua cac lenh chính dể xu li du leiu

Trang tính gom cac cot va hàg giao nhau giữa cột và hàg là ô

3 tháng 1 2018

2/ dữ liệu só la cac só 0,1,2,...9 dau + chỉ số duog dau - chỉ só âm dáu % chỉ tỉ lệ phan trăm

Dữ liệu kí tự là dãy chữa cái và chữ só và các kí hiệu

29 tháng 11 2017

Đây là công nghệ àlolang

29 tháng 11 2017

???

2 tháng 4 2017

Bước 1: Đặt con trỏ chuột vào vị trí các bạn muốn viết phân số, và bấm tổ hợp phím Ctrl + F9.

Sau khi nhấn Ctrl + F9 xuất hiện cặp dấu ngoặc nhọn như sau: {}

Bước 2: Trong dấu ngoặc nhọn các bạn nhập như sau: EQ \F(x,y)

Lưu ý:

- Không tự nhập dấu ngoặc nhọn mà bắt buộc nhấn Ctrl + F9 mới có hiệu lực.

- Sau EQ là khoảng trắng rồi đến dấu "\".

- Không phân biệt chữ hoa và chữ thường, các bạn có thể nhập eq \f(x,y).

- x là tử số, y là mẫu số.

Chúc hok tốt haha

2 tháng 4 2017

Bước 3: Bôi đen lại và nhấn Shift + F9 các sẽ được phân số theo mong muốn.

4 tháng 3 2020

Normal Page Layout Page Break Preview Custom view Full screen

4 tháng 3 2020

Đáp án là B

~Chúc bạn học tốt!~