PASCAL - LINIJSKA STRUKTURA

Funkcija: ABS - funkcija vraća apsolutnu vrijednost izraza
Sintaksa: FUNCTION ABS(vrijednost:<INTEGER ili REAL>): < Kao Argument >;

Tabela D1. ABS - funkcija - Apslolutna vrijednost izraza

Listing programa	Ekran
PROGRAM Apslolutna_vrijednost;
BEGIN
WRITELN('Apsolutna vrijednost -3 ',ABS(-3));	Apsolutna vrijednost -3 3
WRITELN('Apsolutna vrijednost 3 ',ABS(3));	Apsolutna vrijednost 3 3
WRITELN('Apsolutna vrijednost -33 ',ABS(-33));	*Apsolutna vrijednost -33** 9
READLN; END.

Listing programa:

PROGRAM pABS;		   
BEGIN		   
  WRITELN('Apsolutna vrijednost -3 ',ABS(-3));   
  WRITELN('Apsolutna vrijednost 3 ',ABS(3));   
  WRITELN('Apsolutna vrijednost -3*3 ',ABS(-3*3));
  READLN;
END.

Index