|
|
1.1 root 1: procedure main()
2: vowel := 'aeiouAEOIU'
3: count := 0
4: while line := read() do
5: every upto(vowel,line) do count +:= 1
6: write(count)
7: end
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.