Penney's game: Difference between revisions

m
Line 159:
#include <jambo.h>
 
#define GetauppercharintoGetanuppercasecharinto(_X_) Getchar(_X_),Let( _X_ := Ucase(_X_) )
#define Isnotvalidin(_X_) Not( Occurs in (_X_) )
#define NOELIGEPCDESPUESDETI 0
#define ELIGEPCDESPUESDETI 1
 
Main
Line 229:
i=largo, c=0
Loop
Get aan upperuppercase char into 'c'
Continue if ( var(c) Is not valid in ("HT") )
Let( P:=Cat(P,c) )
543

edits