Find words which contains more than 3 e vowels: Difference between revisions

Content added Content deleted

Inline

@@ Line 1,747: / Line 1,747: @@
 done...
 </pre>
+=={{header|RPL}}==
+As RPL is a language for calculators, it is not suitable for reading large text files.
+ « → w
+  « { 5 } 0 CON
+w SIZE '''FOR''' j
+        w j DUP SUB
+        '''IF''' "AEIOUaeiou" SWAP POS '''THEN'''
+           LASTARG 1 - 5 MOD 1 +
+           DUP2 GET 1 + PUT
+        '''END'''
+     '''NEXT'''
+     DUP 2 GET 3 ≥ SWAP
+     [ 1 0 1 1 1 ] DOT NOT AND
+ » » ‘<span style="color:blue>EEE?</span>’ STO
+ "Seventeen" <span style="color:blue>EEE?</span>   <span style="color:grey>@ returns 1 (true)</span>
+ "Eighteen" <span style="color:blue>EEE?</span>    <span style="color:grey>@ returns 0 (false)</span>
 =={{header|Ruby}}==