Talimat: Bir sayının karesini hesapla.
Kod:
Var
  number, squareValue : Integer;
{
  number = 5;
  squareValue = Sqr(number);
  ShowMessage('Sqr(' + IntToStr(number) + ') = ' + IntToStr(squareValue));
}