ForNext

005. declare constant, type, and variable

VBScript

JScript

Perl

PHP

Python

Ruby

PowerShell

Scala

F#

C

C++

C++Builder

VC++

C#

Java

Objective-C

D

VB

VB.NET

Delphi

Pascal

program foo;
const
  PI : real = 3.14159;
type
  customer = record
    id : integer;
    name : string;
  end;
var
  i : integer;
  c : customer;
begin
   body of program

Ada

procedure Foo is
  Pi : constant FLOAT := 3.14;
  i : INTEGER;
  type Customer is record
    Id : INTEGER;
    Name : String(1..4);
  end record;
  C: Customer;
begin
   body of program

PL/SQL

create type customer as (
  id integer,
  name text
);

create or replace function foo() returns void as $$
declare
  pi numeric(10,4) = 3.14;
  i integer = 42;
  c customer%rowtype;
begin
  return;
end $$ language plpgsql;

T-SQL