Question

сгенерируйте 3 случайных целых числа в диапазоне от -20 до+ 40 и введите их на экран в одну строчку Паскаль

Answer 1

var a,b,c:integer;

 begin

  randomize;

  a:=random(60)-20; 

  b:=random(60)-20;

  c:=random(60)-20;

  write(a,' ',b,' ',c);

  readln;

end;