Tools
king.lst
Associated article: Ada for Pascal Programmers
Tags: Tools
_Ada for Pascal Programmers_
by Kim King
program CountLetters(input, output);
{ counts occurrences of letters in the input stream }
var Counts: array ['a'..'z'] of integer;
Ch: char;
begin
for Ch := 'a' to 'z' do
Counts[Ch] := 0;
while not eof ...


