10 lines
170 B
ObjectPascal
10 lines
170 B
ObjectPascal
|
// <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
|
|
|||
|
|
var k1,k2: integer;
|
|||
|
|
|
|||
|
|
begin
|
|||
|
|
k1 := Random(1,6);
|
|||
|
|
k2 := Random(1,6);
|
|||
|
|
writeln('<27><><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>: ',k1,' ',k2);
|
|||
|
|
writeln('<27><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>: ',k1+k2);
|
|||
|
|
end.
|