Заполнить массив из 20 элементов случайными числами из отрезка [-20,20].ПАСКАЛЬ ПОМОГИТЕ ПОЖАЛУЙСТА!!!
Заполнить массив из 20 элементов случайными числами из отрезка [-20,20].ПАСКАЛЬ
ПОМОГИТЕ ПОЖАЛУЙСТА!!!
Ответ(ы) на вопрос:
Program sadadasf;
var i,k: integer;
A: Array[1..20] of integer;
begin
For i:=1 to 20 do
begin
k:=random(41)-20;
A[i]:=k;
end;
end.
Не нашли ответ?
Похожие вопросы