11 lines
243 B
ObjectPascal
11 lines
243 B
ObjectPascal
begin
|
|
var t1 := typeof(integer);
|
|
var t2 := typeof(real);
|
|
writeln([1,2,3]);
|
|
writeln(['a','b','c']);
|
|
writeln(['aa','bb','cc']);
|
|
writeln([1,'a','b','ss']);
|
|
writeln([2.3,1,'g',t1,t2,'dere']);
|
|
writeln([2.3,1.2,1.4,4.3]);
|
|
writeln(['',3.4,'d']);
|
|
end. |