if1.pas

This is programing tutorial for people who wants to know programing in PASCAL.Pascal might be not th

program if1;
var
  i : byte;
begin
  writeln('Enter a number = '); readln(i);
  if i <= 10 then
  begin
    writeln('It is done if i <= 10 only');
    writeln('Or you just can omit the begin..end block');
    writeln('if there is only ONE command inside (See IF2.PAS)');
  end;
  writeln('We always do this');
end.