Сформировать массив из 10 элементов случайным образом от -50 до 50.в паскале)людииишкии,помогите,пожалуйста,жизнь решается:33
Сформировать массив из 10 элементов случайным образом от -50 до 50.в паскале)
людииишкии,помогите,пожалуйста,жизнь решается:33
Гость
Ответ(ы) на вопрос:
Гостьprogram pr;
var a: array [1..10] of integer;
i:integer;
begin
for i:=1 to 10 do
a[i]:=-50+random(50+50+1);
end.
Гостьvar a, b, n, i:integer;
s :array [1..10] of integer;
begin
read (n);{Размер массива}
for i:=1 to n do
begin
s[i]:=-50+random(99);
write (s[i],' ');
end;
end.
P.S. Надеюсь на благодарность и лучший ответ.
Не нашли ответ?
Похожие вопросы