Скачиваний:
10
Добавлен:
01.05.2014
Размер:
279 б
Скачать
program k;
var i:integer;
begin
writeln('Hello world!');
writeln('Input number!');
read(i);
writeln('Number=',i);

if i>1 then
begin
writeln('i>1');
end
else
begin
writeln('i<=1');
end;
writeln('Goodbye');
end.
Соседние файлы в папке Examples