Program test3;

Var p : string; q : real; t: integer; d: char; k: boolean;

Begin

p:= [‘128’ / 128 / 12.8 / true];

q:= [12.8 / ‘128’ / true];

t:= [128 / ‘128’ / 12.8 / true];

d:= [‘p’ / 128 / 12.8 / q];

k:= [false / 128 / 12.8 / ‘12.8’];

End.

g116663    2   28.04.2020 15:16    4