16 lines
176 B
ObjectPascal
16 lines
176 B
ObjectPascal
program Tipos;
|
|
var
|
|
a, b : integer;
|
|
c : real;
|
|
d : char;
|
|
begin
|
|
a := 1;
|
|
b := 2;
|
|
c := 1.5 + 2.5 * 2.0;
|
|
d := 'x';
|
|
write(a);
|
|
write(b);
|
|
write(c);
|
|
write(d);
|
|
end.
|