Közmondások programozási nyelveken:
Bexter
Közmondások programozási nyelveken:
/* Addig jar a korsó a kútra... */
while( state(Korso) != _BROKEN ) go( Korso, &Kut);
/* Ki mint vet, úgy arat */
set_quality( Aratas, get_quality(Vetes) );
/* Ajandék lónak... */
if( origin(Horse) == _SOUVENIR ) Allow_Look_At.Teeth=0;
/* Soha ne a falu legszebb lányát vedd feleségül! */
if( bride_ID == most_beautiful( GetAllGirls(_THIS_VILLAGE))) exit(-1);
{Nezd meg az anyjat, vedd el a lanyat}
Function May_I_Marry_Her(Girl: TGirl)
😛oolean;
begin
With Girl.Mother do
May_I_Marry_Her:
😞(Body.Qality="att ractive"
😉and
(face.Quality="beautiful"
😉);
end;
{Aki másnak vermet ás az a sírásó}
type
TEmployed=class(THuman)
Job : String[30];
procedure OnGraveDigging( Sender: Tobject);
private
{ Private declarations }
public
{ Public declarations }
end;
Procedure TEmployed.OnGraveDigging( Sender: Tobject);
begin
Sender.Job:="GraveDigger";
end;
{Egyszer volt Budán kutyavásár}
Const
Num_Of_Dog_Buying_In_Buda=1;
/* Sok lúd disznót gyöz */
uses animals;
var lud, diszno: Tanimal;
Procedure Attack(A, B: Tanimal; NumA, NumB: Word);
begin
If NumA*A.Strength>NumB*B.Strength then write(A.Caption)
else if NumA*A.Strength<NumB*B.Strength then write(B.Caption)
else write('Nobody');
writeln(' Won');
end;
begin
Lud.Caption:='Lúd';
Lud.Strength:=10;
Diszno.Caption:='Disznó';
Diszno.Strength:=540;
Attack(Lud, Diszno, 1, 1 );
Attack(Lud, Diszno, 20, 1 );
Attack(Lud, Doszno, 60, 1 );
end.
F9 (Run)
Result:
Disznó Won.
Disznó Won.
Lúd Won.
Ha tetszett VOTE és SUBSCRIBE!
Vagy látogass el a Nyuuz.hu oldalra!
Hirdetés
Oldalam nézd meg
😛
Bexter.hu
Comments
O.o
Javítva.
LOL
Nagyon jot nevettem rajta
ez nem olyan faja 😛
Besírtam. Vote.
vote == true;
sub == true;
nagyon nagy! 😃
http://www.erepublik.com/en/article/k-zmond-sok-programoz-si-nyelveken--1258646/1/all">LOL
>if ME.state=='lol': print u"qrva jóóó!!!"
qrva jóóó!!!
>
Nagggyon jó!
Köszi! 🙂
de beteeg xD
Irto surgossen menny pszihiaterhez, neked nagyon megart az info. Amugy faxa 😃 😁
"
kornilk 4 nappal ezelőtt
vote == true;
sub == true;
"
A kettős egyenlőség C típusú nyelveknél azt jelenti, hogy "egyenlő-e" és nem azt hogy "egyenlő"; ez utóbbit a sima "=" jelenti.
De nem baj😁