Скачиваний:
12
Добавлен:
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