11 lines
153 B
ObjectPascal
11 lines
153 B
ObjectPascal
|
var
|
|||
|
|
a, b: string;
|
|||
|
|
|
|||
|
|
begin
|
|||
|
|
a := '1';
|
|||
|
|
b := '1';
|
|||
|
|
assign(input,'input.txt');
|
|||
|
|
readln(a[1], b[1]);
|
|||
|
|
assert(a[1] = '4');
|
|||
|
|
assert(b[1] = '5');
|
|||
|
|
end.
|