Может ли кто-нибудь помочь с темой Массивы по информатике?
Сформировать и вывести на экран в строчку, через пробел, 25 элементов целого типа от -100 до 100 на языке паскаль.
Заранее спасибо
Ответы
Ответ дал:
0
program Masivs;
var
a: array [1..25] of integer;
i: integer;
begin
{Формирование массива случайными числами в заданном диапазоне}
randomize;
for i:=1 to 25 do
a[i]:=random(201)-100;
{Вывод сгенерированных чисел}
for i:=1 to 25 do
Write(a[i],' ');
end;
var
a: array [1..25] of integer;
i: integer;
begin
{Формирование массива случайными числами в заданном диапазоне}
randomize;
for i:=1 to 25 do
a[i]:=random(201)-100;
{Вывод сгенерированных чисел}
for i:=1 to 25 do
Write(a[i],' ');
end;
Похожие вопросы
2 года назад
7 лет назад
7 лет назад
10 лет назад