blob: a7da6c88a993afac6f1a6305e6a7001cc9500597 (
plain)
1
2
3
4
5
6
7
8
9
10
|
uses sysutils;
begin
if format('>%1:*s<',[0, 12,'def',-15]) <> '> def<' then
Halt(1);
if format('>%1:*s< >%*s<', [0, 12, 'abc', 10, 'def']) <> '> abc< > def<' then
Halt(2);
if format('>%1:*.*s< >%*.*s<', [0, 10,10,'abc', 6,6,'def']) <> '> abc< > def<' then
Halt(3);
end.
|
