if4.pas

来自「This is programing tutorial for people w」· PAS 代码 · 共 14 行

program if4;
var
  i : byte;
begin
  writeln('Enter a number = '); readln(i);
  if i <= 10 then
  begin
    writeln('It is done if i <= 10 only');
    writeln('Yeah, you can add begin..end block to else part too !');
  end   { Omit the semicolon BEFORE the end keyword }
  else writeln('It is done if i > 10 only.');
  writeln('We always do this');
end.