Очень срочно помогите написать программу! вот задача: Заполнить массив из 12 эл...

September 2021 1 15 Report

Очень срочно помогите написать программу!
вот задача:
Заполнить массив из 12 элементов случайными числами в интервале [-12..12] и выполнить инверсию для каждой трети массива.
Пример:
Исходный массив:
4 -5 3 10 | -4 -6 8 -10 | 1 0 5 7
Результат:
10 3 -5 4 | -10 8 -6 -4 | 7 5 0 1

Answers & Comments

0vvl Var
a: array[1..12] of integer;
i: integer;
begin
randomize;
for i:=1 to 12 do
a[i]:=random(12+12+1)-12; //Заполнение массива
writeln('Исходный массив: ');
for i:=1 to 12 do
  write(' ',a[i],' '); //Вывод исходного массива
writeln(); //Для перехода на следующую строку
writeln('Результат: ');
for i:=4 downto 1 do
  write(' ',a[i],' ');
for i:=8 downto 5 do
  write(' ',a[i],' ');
for i:=12 downto 9 do
  write(' ',a[i],' '); //Обратный цикли для каждой трети
end.

1 votes Thanks 0

Kiraa45 что-то не так,не те числа выводит

Kiraa45 нужно чтобы было как в примере ,чтобы в точности то же выводил

0vvl Написано же "заполнить массив случайными элементами"

Kiraa45 ай ладн,спасибо

Answers & Comments

esli pereveli cherez perevodchik mozhete ne kidat on mne ne nuzhen i ne pravilnaya

perevedite pozhalujsta tekstcherez perevodchik mne ne nuzhno vot tekstmoya semya ya

2 x02 delta x 01

perevesti na anglijskijcherez perevodchik mozhete ne kidatkinu zhalobu vot tekst

perevedite pozhalujsta tekst srazu govoryu vash perevodchik mne ne nuzhentam on nep

perevod cherez perevodchik ne privetstvuetsya perevesti tekst na anglijskij yazyk

nuzhen horoshij perevodbez perevodchika in the usa the young man who has the sec

srochno nuzhen perevod ne cherez perevodchik

napishite srochno kto umeet nahodit dypisat ura niya kasatelnoj k grafiku fun

perevedite na anglijskij pozhalujstacherez perevodchik ne nuzhno ya ishu druzej gov

рекомендуемые вопросы

Helpful Links

Helpful Social