Run Code
|
API
|
Code Wall
|
Misc
|
Feedback
|
Login
|
Theme
|
Privacy
|
Patreon
test19
//fpc 3.0.4 {dynamic variable p^ is determined nowhere (!)} program test19; {pointer to variable} type t=1..2 ;{new ordinal type} Pt=^t ;{pointer type} var p:Pt;{pointer variable is static (!) variable} a:t;{static variable "a"} begin a:=2; p:=@a; {pointer var is static (!) variable} writeln('direct access',a:2);{direct access through static variable "a"} writeln; writeln('non direct access',p^:2);{non direct access through dynamic (nondirect) variable} end.
run
|
edit
|
history
|
help
0
codigo
11.7.2013 naloga2
zadacha5
tgtrg
pares entre a y b
zadanye 3 г
BubbleSor (slimst)
a 3 .a
practica 7 ejercicio 6
Mengubah biner ke desimal