ΠΡΟΓΡΑΜΜΑ ΠΕΤΡΑ_ΨΑΛΙΔΙ_ΧΑΡΤΙ
ΜΕΤΑΒΛΗΤΕΣ
ΧΑΡΑΚΤΗΡΕΣ: Ο1,Ο2,Ε1,Ε2
ΑΚΕΡΑΙΕΣ: Π1,Π2
ΑΡΧΗ
ΓΡΑΨΕ 'ΔΩΣΕ ΤΟ ΟΝΟΜΑ ΤΟΥ ΠΡΩΤΟΥ ΠΑΙΚΤΗ'
ΔΙΑΒΑΣΕ Ο1
ΓΡΑΨΕ 'ΔΩΣΕ ΤΟ ΟΝΟΜΑ ΤΟΥ ΔΕΥΤΕΡΟΥ ΠΑΙΚΤΗ'
ΔΙΑΒΑΣΕ Ο2
ΓΡΑΨΕ Ο1,'ΠΕΤΡΑ,ΨΑΛΙΔΙ,ΧΑΡΤΙ'
ΔΙΑΒΑΣΕ Ε1
ΓΡΑΨΕ Ο2,'ΠΕΤΡΑ,ΨΑΛΙΔΙ,ΧΑΡΤΙ'
ΔΙΑΒΑΣΕ Ε2
Π1 <-- 0
Π2 <-- 0
ΟΣΟ Ε1<>'ΤΕΛΟΣ' ΚΑΙ Ε2<>'ΤΕΛΟΣ' ΕΠΑΝΑΛΑΒΕ
ΑΝ Ε1='ΠΕΤΡΑ' ΚΑΙ Ε2='ΨΑΛΙΔΙ' ΤΟΤΕ
Π1 <-- Π1+1
ΤΕΛΟΣ_ΑΝ
ΑΝ Ε2='ΠΕΤΡΑ'ΚΑΙ Ε1='ΨΑΛΙΔΙ' ΤΟΤΕ
Π2 <-- Π2+1
ΤΕΛΟΣ_ΑΝ
ΑΝ Ε1='ΧΑΡΤΙ' ΚΑΙ Ε2='ΠΕΤΡΑ' ΤΟΤΕ
Π1 <-- Π1+1
ΤΕΛΟΣ_ΑΝ
ΑΝ Ε2='ΧΑΡΤΙ' ΚΑΙ Ε1='ΠΕΤΡΑ' ΤΟΤΕ
Π2 <-- Π2+1
ΤΕΛΟΣ_ΑΝ
ΑΝ Ε1='ΨΑΛΙΔΙ' ΚΑΙ Ε2='ΧΑΡΤΙ' ΤΟΤΕ
Π1 <-- Π1+1
ΤΕΛΟΣ_ΑΝ
ΑΝ Ε2='ΨΑΛΙΔΙ' ΚΑΙ Ε1='ΧΑΡΤΙ' ΤΟΤΕ
Π2 <-- Π2+1
ΤΕΛΟΣ_ΑΝ
ΓΡΑΨΕ Ο1,'ΔΩΣΕ: ΠΕΤΡΑ,ΨΑΛΙΔΙ,ΧΑΡΤΙ'
ΔΙΑΒΑΣΕ Ε1
ΓΡΑΨΕ Ο2,'ΔΩΣΕ: ΠΕΤΡΑ,ΨΑΛΙΔΙ,ΧΑΡΤΙ'
ΔΙΑΒΑΣΕ Ε2
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΑΝ Π1>Π2 ΤΟΤΕ
ΓΡΑΨΕ 'ΝΙΚΗΣΕ Ο:',Ο1,'ΜΕ ΣΚΟΡ:',Π1,'-',Π2
ΑΛΛΙΩΣ_ΑΝ Π2>Π1 ΤΟΤΕ
ΓΡΑΨΕ 'ΝΙΚΗΣΕ Ο:',Ο2,'ΜΕ ΣΚΟΡ:',Π2,'-',Π1
ΑΛΛΙΩΣ
ΓΡΑΨΕ 'ΤΟ ΠΑΙΧΝΙΔΙ ΕΛΗΞΕ ΙΣΟΠΑΛΟ ΜΕ ΣΚΟΡ:',Π1,'-',Π2
ΤΕΛΟΣ_ΑΝ
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ ΠΕΤΡΑ_ΨΑΛΙΔΙ_ΧΑΡΤΙ