8 lines
127 B
ObjectPascal
8 lines
127 B
ObjectPascal
|
// <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
|
var s1: string := 'Pascal';
|
|||
|
|
var s2: string := 'NET';
|
|||
|
|
|
|||
|
|
begin
|
|||
|
|
writeln(s2+'-'+s1);
|
|||
|
|
writeln(s1+'.'+s2);
|
|||
|
|
end.
|