Đọc từ tệp BINARY.INP số nguyên dương n (0<n<10000). In vào tệp BINARY.OUT tất cả các dãy nhị phân có độ dài n, mỗi dãy một dòng. Vd: n=3 000 001 010 011 100 101 110 111

lanhuong.7302

2 năm trước

Loga Sinh Học lớp 12

0 lượt thích 20 xem

1 trả lời

Thích Trả lời

sagati

const

Inp = 'BINARY.INP';

Outp = 'BINARY.OUT';

var

a: array[1..10000] of byte;

n: word;

f: Text;

procedure Print;

var

i: word;

begin

for i := 1 to n do Write(f, a[i]);

WriteLn(f);

end;

procedure Try(i: word);

var

j: word;

begin

for j:=0 to 1 do

begin

a[i]:=j;

if i=n then Print

else Try(i+1);

end;

begin

Assign(f, Inp); Reset(f);

ReadLn(f, n); Close(f);

Assign(f, Outp); Rewrite(f);

Try(1); Close(f);

end.

Vote (0) Phản hồi (0) 2 năm trước

nguyenhothaochi

*Dùng đệ quy.

uses crt;
var f:text; n:longint;
b:array[1..10000]of longint;
procedure print;
var i:longint;
begin
for i:=1 to n do write(f,b[i]);
writeln(f);
end;
function dequy(a:longint):longint;
var i:longint;
begin
if a=n+1 then print else
for i:=0 to 1 Do
begin
b[a]:=i;
dequy(a+1);
end;
end;
begin
clrscr;
assign(f,'BINARY.INP');reset(f);
readln(f,n);
close(f);
assign(f,'BINARY.OUT');rewrite(f);
dequy(1);
close(f);
end.

Vote (0) Phản hồi (0) 2 năm trước

Các câu hỏi liên quan

mọi người giúp em con b phần 2 với ạ trình bày rõ ràng nha

Người ta muốn có 20 lít nước ở nhiệt độ 35°C hỏi phải pha bao nhiêu lít nước ở nhiệt độ 150°C với bao nhiêu lít nước đang sôi . Tóm tắt nữa nha

Trình bày được những chính sách cai trị của các triều đại phong kiến phương bac doi voi nhan dan ta

3. Hãy kể một số công việc mà cơ quan nhà nước cấp phường nơi em sinh sống đã làm để chăm lo đời sống mọi mặt cho nhân dân?

Giúp mik đi chỉ 1 câu duy nhất thôi

một bể nước hình hộp chử nhật có chiều dài 4 m , chiều rộng 2.7 và chiều cao 2 m . Lúc 8 giờ 20 phút người ta mở hai vòi nước vào bể . ĐẾN 11 GIỜ THÌ CÙNG ĐÓNG CẢ HAI VÒI nước lại thì phần bể trống cao 0.2 m. hỏi mỗi phút cả hai chảy vào bể đc bao nhiêu l nước

sau hiệp định giơ ne vơ 1954 đc kí kết tình hình nước ta ntn ? trong hoàn cảnh đó cách mạng VN đặt ra nhiệm vụ gì ?

Mọi người giúp em bài này vs ạ ! Em cảm ơn ạ!

dạ cho mình hỏi với ạ : Hãy cho biết tập tính nào dưới đây là tập tính bẩm sinh, tập tính học được: – Đến thời kì sinh sản, tò vò cái đào một cái hố trên mặt đất để làm tổ rồi bay di bắt một con sâu bướm, đốt cho sâu bị tê liệt, rồi bỏ vào tổ. Tiếp đó, tò vò cái đẻ trứng vào tổ và bịt tổ lại. Sau một thời gian, tò vò con nở từ trứng ra và ăn con sâu. Các tò vò cái con lớn lên lặp lại trình tự đào hố và đẻ trứng như tò vò mẹ (dù không nhìn thấy các tò vò cái khác làm tổ và sinh đẻ). giải thích hộ mình với ạ

Trên cùng 1 nửa mặt phẳng có bờ chứa tia Oa, vẽ tia Ob và Oc sao cho aOb=70° và aOc=120°. A. Trong 3 tia Oa, Ob, Oc tia nào nằm giữa 2 tia còn lại? Vì sao? B. Tính số đo bOc C. Vẽ tia Ot là tia đối của tia Ob, tia Om là phân giác cOt. Tính số đo bOm.

Loga.vn - Cộng Đồng Luyện Thi Trực Tuyến