Archiwum czerwiec 2020


cze 27 2020 dZIENNIK WG bOOLEAN'a
Komentarze: 0

Jest właśniei Sobota 2020.06.27 h:7:49 i cd natepuje teraz AD 2022.06.07  Wtorek h:20.26

Na odsłuchu SlumsAtack "dobry rok": A zarz po nim 

RPS (Peja) - Frajerhejt 9.12/DTKJ (prod. Hirass) wymiekam przy tym

dlatego napisze

program dziennik;

uses crt,win;

 

type nazwisko:=ARRAY(string);

type imie:=ARRAY(string);

type nr:=ARRAY(string);

begin

      writeln('Podaj nazwisko');

      readln(nazwisko);

      writeln('Podaj imie');

      readln(imie);

      writeln('Podaj nr w dzienniku');

      Readln(nr)'

End. 

Nauka jest tym czym dla Czlowieka powietrze - bynajmniej jesli chodzi o mnie

Kiedy sie ucze czuje sie CUDOWNIE

KOCHAM RAPOWAC

KOCHAM KUPOWAC

LUDZKIE mysli i samogloski

WIEM ze JESTEM beztroski

BOSKI

DIABELNIE POczciwy

BOm ma sporo oliwy

W mej glowie same czastki alfa

CHCE BYC podobny do Gandalfa

Miec jego umysl, DOBRO i sporo przyjaciol

Co najmniej ile sklad PKP ma kol

Zwby godnie sobie zyc

Wystarczy od czsu do czasu osbie przycmic

cze 26 2020 Systemy liczbowe według Boolean'a
Komentarze: 0

program system

uses crt;

win;

var 

 

begin

 

repeat

    system (system)^siódemkowy^(array[0..6]):=0+6=7 :=1?+6?:=7;

     system (system binarny)^dwojkowy^(array[0..1]):0+1:=1+1:=01;

     system (system)^osemkowy^(array[0..7]):=1:7:+8::1?+6?:=8'

 until false

END.

 

 

if system<>system

 

 

then begin

 

system(dwojkowy-:=2,x:=0 y:1):+ system((szesnastkowy+0 to : 1f)):=system (dzięsiatny:=+10(system siódemkowy+3):=array^system(dwojkowy=binarny(szesnastkowy=heksagonalny) ++[osemkowy] 2(dziesiatkowy:=array[0..10])

end;

until false;

end.