Pagina de start a forumului backtracking.MyForum.ro backtracking.MyForum.ro
Fa-ti si tu propriul forum, pe www.myforum.ro!
 
 FAQFAQ   CautareCautare   MembriMembri   GrupuriGrupuri   InregistrareInregistrare 
 ProfilProfil   Mesaje privateMesaje private   AutentificareAutentificare 

Greedy Gray

 
Creaza un subiect nou   Raspunde la subiect    Pagina de start a forumului backtracking.MyForum.ro -> Teme pentru acasa
Subiectul anterior :: Subiectul urmator  
Autor Mesaj
Calin
Junior
Junior


Data inscrierii: 08/Noi/2007
Mesaje: 3

MesajTrimis: 20/12/2007 09:58    Titlul subiectului: Greedy Gray Raspunde cu citat (quote)

Cod:
type vector=array [1..100] of 0..1;
var n:integer;
    i:byte;
    b,g:vector;
procedure gray(n:integer);

begin
g[1]:=b[1];
for i:=2 to n do
    g[i]:=(b[i]+b[i-1]) mod 2
end;
begin
write('n=');readln(n);
for i:=1 to n do
    begin
    write('b[',i,']=');
    readln(b[i]);
    end;
gray(n);
for i:=1 to n do
    writeln(g[i]);
readln
end.
Sus
Vezi profilul utilizatorului Trimite mesaj privat
misanchik
Junior
Junior


Data inscrierii: 21/Iul/2012
Mesaje: 5
Localitate: Bulgaria

MesajTrimis: 02/08/2012 03:18    Titlul subiectului: Raspunde cu citat (quote)

Very useful information
Sus
Vezi profilul utilizatorului Trimite mesaj privat
Afiseaza mesajele pentru a le previzualiza:   
Creaza un subiect nou   Raspunde la subiect    Pagina de start a forumului backtracking.MyForum.ro -> Teme pentru acasa Ora este GMT + 3 ore
Pagina 1 din 1

 
Mergi direct la:  
Nu puteti crea un subiect nou in acest forum
Nu puteti raspunde in subiectele acestui forum
Nu puteti modifica mesajele proprii din acest forum
Nu puteti sterge mesajele proprii din acest forum
Nu puteti vota in chestionarele din acest forum


Powered by phpBB © 2001, 2005 phpBB Group
Fa-ti si tu propriul forum GRATUIT, pe www.myforum.ro