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.

D
datcoder
CTVVIP
28 tháng 5

- Chọn dữ liệu trong khối D3:F8, trong thẻ Data chọn lệnh Data Validation.

- Tại thẻ Setting, chọn kiểu Decimal trong danh sách thả xuống Allow, nhập các giá trị minimum và maximum như hình rồi bấm OK

8 tháng 9 2021

lưu ý: dùng C++ và dùng lệnh for

 

#include <iostream>

using namespace std;

int main()

{

int i,n,a,b,kt,j;

cout<<"a="; cin>>a;

cout<<"b="; cin>>b;

for (i=a; i<=b; i++) 

{

if (i>2)

{

kt=0;

for (j=2; j<=i-1; j++)

if (i%j==0) kt=1;

if (kt==0) cout<<i<<" ";

}

}

return 0;

}

18 tháng 12 2021

Câu 9: 

- Các thành phần chính trong poweroint là:

 + Nút Minimize

 + Ribbon

 + Thanh tiêu đề

 + Quick Access Toolbar

8 tháng 10 2020

Program HOC24;

const fi='Cau1.INP';

fo='Cau2.OUT';

var i,a,b,c,t,d: integer;

f: text;

function ucln(x,y: integer): integer;

var t: integer;

begin

while y<>0 do

begin

t:= x mod y;

x:=y;

y:=t;

end;

ucln:=x;

end;

procedure ip;

begin

assign(f,fi);

reset(f);

read(f,a,b,c);

close(f);

end;

procedure out;

begin

assign(f,fo);

rewrite(f);

for i:=b to c do

begin

if i mod a=0 then write(f,i,' ');

t:=t+i;

end;

writeln(f);

while t<>0 do

begin

t:=t div 10;

inc(d);

end;

writeln(f,d);

if ucln(a,b,c)=1 then write(f,1) else write(f,0);

close(f);

end;

begin

ip;

out;

end.

12 tháng 12 2019

uses crt;
const fi='dt.inp';
fo='dt.out';
var n,i,d,x,t,ln,kt:integer;
st:string;
a:array[1..100]of integer;
f1,f2:text;
begin
clrscr;
assign(f1,fi); reset(f1);
assign(f2,fo); rewrite(f2);
readln(f1,n);
{-------------------------cau-a-----------------------}
str(n,st);
d:=length(st);
for i:=1 to d do
val(st[i],a[i],x);
t:=0;
for i:=1 to d do
begin
if a[i]=0 then t:=t+6;
if a[i]=1 then t:=t+2;
if a[i]=2 then t:=t+5;
if a[i]=3 then t:=t+5;
if a[i]=4 then t:=t+4;
if a[i]=5 then t:=t+5;
if a[i]=6 then t:=t+6;
if a[i]=7 then t:=t+3;
if a[i]=8 then t:=t+7;
if a[i]=9 then t:=t+6;
end;
writeln(f2,t);
{-----------------------cau-b---------------------------}
ln:=a[1];
for i:=1 to d do
if ln<a[i] then ln:=a[i];
writeln(f2,ln);
{--------------------cau-c-------------------------------}
kt:=0;
for i:=1 to d-1 do
if a[i]>a[i+1] then kt:=1;
if kt=0 then writeln(f2,'T')
else begin
kt:=0;
for i:=1 to d-1 do
if a[i]<a[i+1] then kt:=1;
if kt=0 then writeln(f2,'L')
else writeln(f2,'0');
end;
close(f1);
close(f2);
readln;
end.

mọi người giúp e vs ạ làm bằng pascal e xin cảm ơn ạ Bài 1. RÔ BỐT (5 điểm) Nhân dịp Tuấn đạt kết quả cao trong Kỳ thi Olympic 23/4, mẹ của Tuấn thưởng cho Tuấn một con Rô bốt có thể nhận dạng giọng nói con người. Nếu Tuấn hô “trái” thì ngay lập tức Rô bốt bước sang trái một bước, còn nếu Tuấn hô “phải” thì Rô bốt sẽ bước sang phải một bước. Yêu cầu: Hỏi sau N lần Tuấn hô (“trái” tương...
Đọc tiếp

mọi người giúp e vs ạ làm bằng pascal e xin cảm ơn ạ

Bài 1. RÔ BỐT (5 điểm)

Nhân dịp Tuấn đạt kết quả cao trong Kỳ thi Olympic 23/4, mẹ của Tuấn thưởng cho Tuấn một con Rô bốt có thể nhận dạng giọng nói con người. Nếu Tuấn hô “trái” thì ngay lập tức Rô bốt bước sang trái một bước, còn nếu Tuấn hô “phải” thì Rô bốt sẽ bước sang phải một bước.

Yêu cầu: Hỏi sau N lần Tuấn hô (“trái” tương ứng với số 0, “phải” tương ứng với số 1) thì Rô bốt cách vị trí ban đầu bao nhiêu bước?

Dữ liệu vào: File văn bản ROBOT.INP

- Dòng thứ nhất là số N (1 ≤ N ≤ 105);

- Dòng thứ 2 gồm N số 0 hoặc 1, mỗi số cách nhau một khoảng trắng.

Dữ liệu ra: File văn bản ROBOT.OUT

- Gồm khoảng cách của Rô bốt sau N lần hô so với vị trí ban đầu mà Rô bốt đứng.

Ví dụ:

ROBOT.INP

ROBOT.OUT

3

1 1 1

3

Bài 2. MUA HÀNG (5 điểm)

Tâm mở một cửa hàng bán văn phòng phẩm. Trong ngày khai trương, để ”mua may bán đắt”, Tâm quan niệm rằng khi khách hàng mua một sản phẩm nào đó thì phải trả đúng với số tiền của sản phẩm để Tâm không phải trả lại tiền thừa cho khách hàng.

Nam là bạn thân của Tâm đến mua hàng. Nam hiện có N tờ tiền, mỗi tờ tiền M đều có giá trị khác nhau. Giả thiết rằng với số tiền của Nam hiện có đều có thể mua được một số sản phẩm trong cửa hàng.

Yêu cầu: Vì Nam không quen với việc tính toán, em hãy giúp Nam tính xem với N tờ tiền như vậy thì Nam không thể mua sản phẩm có giá trị nhỏ nhất (Min) là bao nhiêu?

Dữ liệu vào: File văn bản BUY.INP

- Dòng thứ nhất là số N (0<N≤100)

- Dòng thứ hai có N tờ tiền, mỗi tờ tiền M cách nhau một khoảng trắng (0<M<109).

Dữ liệu ra: File văn bản BUY.OUT

- Gồm một số nguyên dương Min cần tìm.

Ví dụ:

BUY.INP

BUY.OUT

5

1 2 4 9 100

8

3

1 2 3

7

Bài 3. SỐ MAY MẮN (5 điểm)

Công ty Tin học ACB tổ chức buổi hội thảo nhằm giới thiệu phần mềm mới của công ty. Buổi hội thảo có N khách mời tham dự và trên mỗi ghế ngồi có ghi số ghế là M. Trước khi kết thúc hội thảo, công ty yêu cầu các khách mời tự tìm cho mình một số cuối cùng dựa trên số ghế mình ngồi (số cuối cùng được xác định là tổng các chữ số của số đó, sau đó lại tính tổng các chữ số của số mới tạo được cho đến khi chỉ còn một chữ số duy nhất). Sau khi kết thúc hội thảo, công ty tổ chức trao quà cho các khách mời có số cuối cùng trùng với số may mắn (số may mắn là số mà có số lượng số cuối cùng nhiều nhất do các khách mời tìm được).

Ví dụ: Số ghế là M = 29 thì số cuối cùng được tạo ra là 2 (29 ® 11 ® 2).

Yêu cầu: Gọi K là số may mắn hãy tìm số may mắn đó? (nếu có nhiều số lượng số cuối cùng bằng nhau thì chọn số cuối cùng mà khách tìm được có giá trị nhỏ nhất.

Dữ liệu vào: File văn bản LUCKY.INP

- Dòng thứ nhất là số N (1 ≤N≤105);

- N dòng tiếp theo là tương ứng với số ghế M của khách mời (0 ≤ M ≤ 109).

Dữ liệu ra: File văn bản LUCKY.OUT

- Gồm một số K cần tìm.

Ví dụ:

LUCKY.INP

PTICH.OUT

5

0

3

29

21

20

2

1

Bài 1:

const fi='robot.inp';
fo='robot.out';
var f1,f2:text;
n,i,t:integer;
a:array[1..10000]of integer;
begin
assign(f1,fi); reset(f1);
assign(f2,fo); rewrite(f2);
readln(f1,n);
for i:=1 to n do
read(f1,a[i]);
t:=0;
for i:=1 to n do
begin
if a[i]=1 then t:=t+1
else t:=t-1;
end;
writeln(f2,t);
close(f1);
close(f2);
end.

D
datcoder
CTVVIP
3 tháng 11 2023

#include <bits/stdc++.h>

using namespace std;

int main () { int a[1000],n,i;

cin >> n;

for (int i=1;i<=n;i++)

cin >> a[i];

for (int i=2;i<=n;i++)

if (((a[i]<0) and (a[i-1]<0)) or ((a[i]>0) and (a[i-1]>0))) {

cout << a[i-1] <<" " << a[i];

break; }

return 0;

}

Một cơ sở sản xuất hàng thủ công mỹ nghệ vừa nhận được một đơn đặt hàng gia công n sản phẩm. Với số lượng đặt hàng lớn như vậy, cơ sở đã huy động hết toàn bộ công nhân bắt tay vào làm ngay. Tuy nhiên đây lại là một sản phẩm mới nên ngày đầu tiên cơ sở chỉ làm ra được k sản phẩm. Sang ngày thứ hai, các công nhân đã thành thạo hơn nên số sản phẩm làm ra được nhiều gấp đôi ngày thứ...
Đọc tiếp

Một cơ sở sản xuất hàng thủ công mỹ nghệ vừa nhận được một đơn đặt hàng gia công n sản phẩm. Với số lượng đặt hàng lớn như vậy, cơ sở đã huy động hết toàn bộ công nhân bắt tay vào làm ngay. Tuy nhiên đây lại là một sản phẩm mới nên ngày đầu tiên cơ sở chỉ làm ra được k sản phẩm. Sang ngày thứ hai, các công nhân đã thành thạo hơn nên số sản phẩm làm ra được nhiều gấp đôi ngày thứ nhất. Và cứ như vậy, năng suất của ngày hôm sau lại cao gấp đôi ngày hôm trước. Yêu cầu: Hãy cho biết cơ sở cần bao nhiêu ngày để hoàn thành hết n sản phẩm? Dữ liệu vào: Nhập từ bàn phím các số nguyên n, k (1≤n,k≤100000). Giả thiết

dữ liệu được nhập đúng, không cần kiểm tra. Kết quả ra: Xuất ra màn hình số ngày hoàn thành các sản phẩm theo đơn đặt hàng.

1
9 tháng 11 2019

Program hotrotinhoc;

var n,k,i,t,s,j: integer;

begin

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

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

t:=1;

while k<n do

begin

k:=k*2;

t:=t+1;

end;

write(t);

readln

end.