Question

В данной задаче числа задаются с помощью функции random(x), которая выдает случайное число из диапазона от 0 до числа х-1. Нам нужен диапазон от 1 до 50, следовательно будем использовать функцию random(50)+1
Составить программу, в которой задаются два случайных числа в диапазоне от 1 до 50 и если первое число больше второго, то вычисляется сумма чисел, иначе – разность.

Answer 1

Відповідь:

const x=50;

var a,b,c:integer;

begin

 a:=random(x)+1;

 b:=random(x)+1;

 writeln('a = ',a,', b = ',b);

 if a > b then c := a + b else

   c := a-b;

 writeln('c = ',c);

end.

Пояснення:

a = 11, b = 45

c = -34