ЕП
Елена Прорубникова
ABC Pascal Неверное количество фактических параметров
Program n_1;
var x,n:integer;
begin
write ('Исследование функции random');
randomize ('x,n'); вот в этой строке
write ('введите x,n>>);
readln(x);
readln (n);
writeln ('random(',x,')=',random(x));
writeln ('random(',x,')+',n,'=',random(x)+n);
end.