Опубликовано 09.06.2017 по предмету Информатика от Гость >> <<

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

Ответ оставил Гость

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;