VAL - Pretvara string u cio broj.
Sintaksa: PROCEDURE VAL(s; VAR v; VAR code: INTEGER);
Tabela d.30. VAL - procedura
Listing programa |
Ekran |
Opis |
PROGRAM Pretvaranje; |
|
Zaglavlje |
var |
|
|
i, kod: INTEGER; |
|
|
paramStr: STRING; |
|
String |
BEGIN |
|
|
paramStr := '1234'; |
|
String |
Val(paramStr, i, kod); |
9.99 9 |
Pretvaranje |
{ Greska pri pretvaranju u INTEGER? } |
|
|
IF Kod <> 0 THEN |
-9.99 -9 |
? greška |
WRITELN('Greska na poziciji: ', kod) |
|
|
ELSE |
0.99 0 |
Nije |
WRITELN('Vrijednost ',paramStr:10, i:10); |
Vrijednost 1234 1234 |
Ispis |
END. |
|
Kraj programa |
Listing programa:
PROGRAM pVAL;
USES
WinCrt;
VAR
i, kod: INTEGER;
paramStr: STRING;
BEGIN
paramStr := '1234';
Val(paramStr, i, kod);
{ Greska pri pretvaranju u INTEGER? }
IF Kod <> 0 THEN
WRITELN('Greska na poziciji: ', kod)
ELSE
WRITELN('Vrijednost ',paramStr:10, i:10);
END.
 |
 |
 |
 |
 |
 |
 |
