12 lines
106 B
Plaintext
12 lines
106 B
Plaintext
let
|
|
var a : Integer
|
|
in
|
|
begin
|
|
a := 0;
|
|
while a < 5 do
|
|
begin
|
|
put('a');
|
|
a := a + 1;
|
|
end
|
|
end
|