program RandomDifference;
varnum1, num2, difference: integer;
beginrandomize;
// Генерируем два случайных числа в промежутке от -10 до 0num1 := random(11) -1;num2 := random(11) -1;
// Вычисляем разностьdifference := num1 - num2;
// Выводим результатwriteln('Первое число: ', num1);writeln('Второе число: ', num2);writeln('Разность чисел: ', difference);
end.
program RandomDifference;
var
num1, num2, difference: integer;
begin
randomize;
// Генерируем два случайных числа в промежутке от -10 до 0
num1 := random(11) -1;
num2 := random(11) -1;
// Вычисляем разность
difference := num1 - num2;
// Выводим результат
writeln('Первое число: ', num1);
writeln('Второе число: ', num2);
writeln('Разность чисел: ', difference);
end.