ответ:var n, i, x: integer;
begin
randomize;
n := random (7) + 5;
for i := 1 to n do begin
x := random (100) - 50;
write (x:5)
end;
readln
end.
Объяснение: возможно оно я не уверен(Паскаль дерьмо)
