Камень
свойства:тяжелый,черный,круглый
их значения:вес,цвет,форма)
Ответ:
Это?
Объяснение:
Если я правильно понял то это вроде то, кинул ещё 2 вариант как может быть
Может интернет,ведь примерно в те годы он появился
Var
a: array[1..100] of integer;
n: integer;
i: byte;
begin
randomize;
write ('Введите N: ');
readln (n);
for i:=1 to n do begin
a[i]:=random(101);
write (a[i]:5);
end;
writeln;
for i:=n downto 1 do
write (a[i]:5);
end.
----------------------------------------
Результат:
Введите N: 10
37 48 9 48 68 5 67 100 67 20
20 67 100 67 5 68 48 9 48 37