Structura programelor Pascal

Programul sursa

Explicatia

program CalculArie;
const pi=3.1415926;
var raza, aria: Real;

numele programului
declarare constanta
declarare variabile

begin
   ReadLn(raza);
   if raza<=0 then
      WriteLn('imposibil')
   else
      begin
         aria := pi * Sqr(raza);
         WriteLn('aria este: ', aria)
      end
end.

se incepe un grup de instructiuni
se citeste valoarea variabilei raza
daca raza este mai mica decat 0 atunci
scrie imposibil
altfel
incepe un nou grup de instructiuni
aria ia valoarea pi * (raza la patrat)
scrie aria este si valoarea variabilei aria
se incheie al doilea grup de instructiuni
se incheie primul grup de instructiuni