home > 比較編 > Delphi, PL/SQL, T-SQL, Ada > execution control >

ForNext

Only Do What Only You Can Do

065. if

VBScript

JScript

Perl

PHP

Python

Ruby

PowerShell

Scala

F#

C

C++

C++Builder

VC++

C#

Java

Objective-C

D

VB

VB.NET

Delphi

Pascal

if i = 0 then
begin
  writeln('no hits');
end
else
  if i = 1 then
  begin
    writeln('one hit');
  end
  else
    writeln(IntToStr(i) + ' hits');

Ada

if I = 0 then
  Put_Line("no hits");
elsif I = 1 then
  Put_Line("one hit");
else
  Put_Line(Integer'Image(I) & " hits");
end if;




PL/SQL

if i = 0 then
  return 'no hits';
elsif i = 1 then
  return 'one hit';
else
  return i || ' hits';
end if;




T-SQL

関数型

inserted by FC2 system