Предмет: Информатика,
автор: Гугуся1456
МНОГО БАЛЛОВ!!Напишите программу на Паскале пожалуйста.Заполните одномерный массив с помощью датчика случайных чисел таким образом,чтобы все его элементы были различны(не используйте пожалуйста логарифмы и тд максимально простое оформление)
Ответы
Автор ответа:
0
Можно так (элементы будут всегда упорядочены по возрастанию):
const n=10;
var a:array[1..n] of integer;
i:integer;
begin
Randomize;
for i:=1 to n do
begin
a[i]:=i*50+random(50);
write(a[i],' ');
end;
writeln;
end.
Пример:
67 147 173 227 294 318 356 426 497 542
const n=10;
var a:array[1..n] of integer;
i:integer;
begin
Randomize;
for i:=1 to n do
begin
a[i]:=i*50+random(50);
write(a[i],' ');
end;
writeln;
end.
Пример:
67 147 173 227 294 318 356 426 497 542
Похожие вопросы
Предмет: Английский язык,
автор: Аноним
Предмет: Математика,
автор: Аноним
Предмет: География,
автор: Nasti210
Предмет: Биология,
автор: matek7
Предмет: Математика,
автор: Olyru2011