150 downto 0 - pseudokonkurs

KaYou · Kwiecień 11, 2006

taki ot kod

<html>
<p>
111
</p>
</html>

DarkAndrew · Maj 21, 2006

to będzie 110 w whitespaceKOD

Budrys · Maj 21, 2006

[delphi][/delphi]

filuu · Maj 21, 2006

Object Pascal [b]Niewiem pisac zbytnio z pamięci ale moze mam farta D

Delphi

var
Liczba1 : integer;
Liczba2 : integer;
Wynik : string;
Begin
Liczba 1 :=8;
Liczba2 :=100;
Wynik := inttostr(Liczba1 + liczba2);
Edit1.text :=Wynik;
end;

KaYou · Maj 21, 2006

binarnie

1101011

KKKas · Maj 21, 2006

106:

[code=Perl]

#!/usr/bin/perl [/code]

$_ = 'saumd-cfas89u4mv-s94um9ub5vsm-98j4v]]XXM]KLLLBĘó&BC2&#

Lavi · Maj 31, 2006

105 - Po polsku

Iskar · Czerwiec 1, 2006

104, kod maszynowy:

KODB409 BA09 01CD 21CD 2031 3034 24

ktoś · Czerwiec 1, 2006

103, hex
KOD67

// bin juz byl, a poza tym tylko jedna liczba w poscie - Iskar

Varcetti · Czerwiec 24, 2006

102:
[code=Delphi]
var liczba1, liczba2: Integer;
begin
liczba2:=204;
liczLN[XL]BY[[K^R[XLJNB[B [/code]

KKKas · Czerwiec 24, 2006

Morse ;)
[quote] ... - --- / .--- . -.. . -. [/quote]

ktoś · Czerwiec 24, 2006

100
[code=Delphi]
begin
edit1.text := '1';
211 mod (110 + strtoint(edit1.t^
JNB[ [/code]

Wosiedem · Czerwiec 25, 2006

99
Pascalstring s = "c";
std::cout << (int)s;

evil · Czerwiec 27, 2006

98

[code=Delphi]
var
liczba1 : Integer;
liczba2 : Integer;
begin
XLHHNMBXLHB[[K[H[Ć7Ś&FbĆ7Ś&\"ŚVćC [/code]

Jason · Czerwiec 27, 2006

C++, 97.
Pascal#include <iostream>
using namespace std;
int liczba;
int main()
{
liczba=(32 >> 1)+(33<<1)+(31 >> 1);
cout << liczba << endl;
system("pause");
}

Liczba powstała za pomocą przesunięć bitowych

evil · Czerwiec 27, 2006

Delphi 96:

[delphi][/delphi]

Nie najlepiej to jest napisane ale chodziło mi żeby przez przypadek nie [b]powturzyć tego samego sposobu

filuu · Czerwiec 27, 2006

95 , Delphi :

[code=Delphi]
var

l : integer;
k : string;

begin
l :=95;
k :=in
NBLK[ZB[B [/code]

ktoś · Czerwiec 28, 2006

delphi 94
[code=Delphi]
var
i : integer;
begin
i := 188;
shr(i);
writeln(inttJJNB[ [/code]

sazian · Czerwiec 30, 2006

delphi 93
[code=Delphi]
var
x,y,z:integer;
begin
x:=100;
y:=59;
z:=2;

labeK[Z[
JX[N [/code]
nie wiem jak ale działa :twisted:

ktoś · Czerwiec 30, 2006

[quote=sazian]delphi 93
[code=Delphi] const
Tekst : string[2] = Ć;
begin
label1.caption := c
^WJJH

^JJNB[<i)Ź'ŚyhuĘxo*ę)]zZaY[BX[K[H[

JNB[ [/code]

sazian · Czerwiec 30, 2006

delphi 91
[code=Delphi]
t:array[1..91]of boolean;
begin
label1.Caption:=inttost^[
JNB [/code]

to jak to działa??

Spider100 · Czerwiec 30, 2006

[code=Delphi] program Project1;
{$APPTYPE CONSOLE}
uses
SysUtils;
be[B][[ÓY[T^KN
NBXYB[ [/code]

Ciekawe czy u was będzie 90 bo u mnie jest

ktoś · Lipiec 1, 2006

Spider: u mnie jest 92

Sazian: inttostr((x xor y)and not z);
mozna zapisać jako

i := X xor Y;
i2 := not z;
wynik := i and i2;

wszystkie użyte operatory dotyczą BITÓW. A więc jak rozpiszemy liczby, które wymieniłeś:
X xor Y (zgodność)
01100100 = x
00111011 = y
___________
01011111

not z (odwrócenie)
00000010 = z
___________
11111101 = 253

i and i2 ( hmm... mnożenie? ):

01011111
11111101 = 253
______________
01011101 = 93

Chyba wybaczycie mi OT

sazian · Lipiec 1, 2006

dzięki ktośiu za odpowiedz

Spider100: 92

Zaloguj się

150 downto 0 - pseudokonkurs

Polecane posty

Link do komentarza

Udostępnij na innych stronach

Link do komentarza

Udostępnij na innych stronach

Link do komentarza

Udostępnij na innych stronach

Link do komentarza

Udostępnij na innych stronach

Link do komentarza

Udostępnij na innych stronach

Link do komentarza

Udostępnij na innych stronach

Link do komentarza

Udostępnij na innych stronach

Link do komentarza

Udostępnij na innych stronach

Link do komentarza

Udostępnij na innych stronach

Link do komentarza

Udostępnij na innych stronach

Link do komentarza

Udostępnij na innych stronach

Link do komentarza

Udostępnij na innych stronach

Link do komentarza

Udostępnij na innych stronach

Link do komentarza

Udostępnij na innych stronach

Link do komentarza

Udostępnij na innych stronach

Link do komentarza

Udostępnij na innych stronach

Link do komentarza

Udostępnij na innych stronach

Link do komentarza

Udostępnij na innych stronach

Link do komentarza

Udostępnij na innych stronach

Link do komentarza

Udostępnij na innych stronach

Link do komentarza

Udostępnij na innych stronach

Link do komentarza

Udostępnij na innych stronach

Link do komentarza

Udostępnij na innych stronach

Link do komentarza

Udostępnij na innych stronach

Zarchiwizowany