mirror of
https://gitlab.com/freepascal.org/fpc/pas2js.git
synced 2025-04-07 12:17:49 +02:00
17 lines
251 B
ObjectPascal
17 lines
251 B
ObjectPascal
program demobrowserconsole;
|
|
|
|
uses browserconsole;
|
|
|
|
|
|
Var
|
|
I : Integer;
|
|
|
|
begin
|
|
For I:=30 downto 1 do
|
|
Writeln(I,', Hello, world!');
|
|
ConsoleStyle:=DefaultCrtConsoleStyle;
|
|
InitConsole;
|
|
For I:=1 to 30 do
|
|
Writeln(I,', Hello, world ?');
|
|
end.
|