Цитата:
Сообщение от Vladimir_S
Пожалуйста:
Код:
program massiv;
var
A:array [1..10] of integer;
i,min: integer;
begin
Randomize;
for i:=1 to 10 do
begin
A[i]:=random(10);
|
Вот до сюда все понятно. Простите, я немножко туплю, но можно дальше с пояснениями?
P.S. За код спасибо