Question

Получить два целых случайных числа Z и K в интервале (-5,15). Распечатать на одной строке оба числа и их сумму. (ПАСКАЛЬ)

Answer 1

Ответ:

var N,K:integer;

begin

 N:=random(21)-5;

 K:=random(21)-5;

 write('N=',N,' ','K=',K,' ','Сумма=',N+K)

end.

Объяснение:

random(max-min+1)+min для любого диапозона

Answer 2

Для генерации двух случайных целых чисел Z и K в интервале (-5, 15) на языке программирования Pascal, вам потребуется использовать функцию Randomize и Random, а затем вычислить их сумму и вывести результат на экран. Вот как это можно сделать:

program RandomNumbersSum;

var
  Z, K, Sum: Integer;

begin
  Randomize;  // Инициализируем генератор случайных чисел

// Генерируем случайные числа в интервале (-5, 15)
  Z := Random(21) - 5;  // Random(21) генерирует числа от 0 до 20, затем мы вычитаем 5
  K := Random(21) - 5;

// Вычисляем сумму
  Sum := Z + K;

// Выводим результат на экран
  writeln('Случайное число Z: ', Z);
  writeln('Случайное число K: ', K);
  writeln('Сумма Z и K: ', Sum);
end.

В этой программе мы используем функцию `Randomize` для инициализации генератора случайных чисел и `Random(21) - 5` для генерации случайных чисел в интервале (-5, 15). Затем мы вычисляем сумму Z и K и выводим все три числа на экран.