Обработка одномерных числовых массивов. суммирование элементов массива.

@Oogernad · Регистрация: 20.04.2020

Студворк — интернет-сервис помощи студентам

Помогите немогу разобраться(

Найти разность сумм первых пяти и последующих пяти элементов одномерного массива, состоящего из десяти случайных элементов в диапазоне от 1 до 8 . Внеси необходимые изменения в имеющуюся программу.

Pascal
1
2
3
4
5
6
7
8
9
10
11
Program Primer_4; 
  var a: array[1..5] of integer; i: integer;
Begin 
s:=0;
for i:=1 to 5 do begin
    A[i]:=random(200-100)+100;
    write( A[i], ' ' );
     s:=s+A[i];
end;
  writeln ('Сумма элементов массива  равна', s)
End.

@Puporev · 20.04.2020, 20:49

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
const n=10;
var a: array[1..n] of integer;
    i,s1,s2: integer;
Begin
s1:=0;
s2:=0;
writeln('Массив');
for i:=1 to n do
 begin
  a[i]:=1+random(8);
  write( a[i], ' ' );
  if i<= n div 2 then s1:=s1+a[i]
  else s2:=s2+a[i];
 end;
writeln;
writeln ('Разность сумм элементов первой и второй половин массива=',s1-s2)
end.

@Oogernad · 20.04.2020, 20:53 **[ТС]**

Да ты жгешь, я 3 часа убила и ничего не сделала. Фигею с людей которые шарят в инфе
Рельно спасибо❤️

@Puporev · 20.04.2020, 20:56

А ты сначала читать научись.
Посмотри что написано в задании и у тебя в коде. Откуда 5? Откуда random(200-100)+100;? и прочее.

@Oogernad · 20.04.2020, 20:58 **[ТС]**

Это было в задании дано умник я ничего не придумывала

@Puporev · 20.04.2020, 21:00

Сообщение от Oogernad

дномерного массива, состоящего из десяти случайных элементов в диапазоне от 1 до 8

10 и 1+random(8).

@Oogernad · 20.04.2020, 21:08 **[ТС]**

Сообщение от Oogernad

Внеси необходимые изменения в имеющуюся программу.

читай внимательней

Новые блоги и статьи Все статьи Все блоги /
Автозаполнение реквизитов при создании документа Maks 26.03.2026 Код из решения ниже размещается в модуле объекта документа, в процедуре "ПриСозданииНаСервере". Алгоритм проверки на предмет заполнения реквизитов реализован с целью установки значения по умолчанию,. . .	Команды "Заполнить" и "Очистить" на форме документа Maks 26.03.2026 1. Команда формы "ЗаполнитьЗапчасти". На примере нетипового документа разработанного в конфигурации КА2. В качестве источника данных указан регистр накопления, в который записываются данные о. . .	Кому нужен AOT? DevAlt 26.03.2026 Решил сделать простой ланчер Написал заготовку: dotnet new console --aot -o UrlHandler var items = args. Split(":"); var tag = items; var id = items; var executable = args;. . .	Отправка уведомления на почту при изменении наименования справочника Maks 24.03.2026 Программная отправка письма электронной почты на примере изменения наименования типового справочника "Склады" в конфигурации БП3. Перед реализацией необходимо выполнить настройку системной учетной. . .
модель ЗдравоСохранения 5. Меньше увольнений- больше дохода! anaschu 24.03.2026 Теперь система здравосохранения уменьшает количество увольнений. 9TO2GP2bpX4 a42b81fb172ffc12ca589c7898261ccb/ https:/ / rutube. ru/ video/ a42b81fb172ffc12ca589c7898261ccb/ Слева синяя линия -. . .	Midnight Chicago Blues kumehtar 24.03.2026 Такой Midnight Chicago Blues, знаешь?. . Когда вечерние улицы становятся ночными, а ты не можешь уснуть. Ты идёшь в любимый старый бар, и бармен наливает тебе виски. Ты смотришь на пролетающие. . .	SDL3 для Desktop (MinGW): Вывод текста со шрифтом TTF с помощью библиотеки SDL3_ttf на Си и C++ 8Observer8 24.03.2026 Содержание блога Финальные проекты на Си и на C++: finish-text-sdl3-c. zip finish-text-sdl3-cpp. zip	Жизнь в неопределённости kumehtar 23.03.2026 Жизнь — это постоянное существование в неопределённости. Например, даже если у тебя есть список дел, невозможно дойти до точки, где всё окончательно завершено и больше ничего не осталось. В принципе,. . .

@Oogernad 0 / 0 / 0 Регистрация: 20.04.2020 Сообщений: 4
	20.04.2020, 20:53 [ТС]
	Да ты жгешь, я 3 часа убила и ничего не сделала. Фигею с людей которые шарят в инфе Рельно спасибо❤️ 0

@Puporev Почетный модератор 64315 / 47611 / 32743 Регистрация: 18.05.2008 Сообщений: 115,167
	20.04.2020, 20:56
	А ты сначала читать научись. Посмотри что написано в задании и у тебя в коде. Откуда 5? Откуда random(200-100)+100;? и прочее. 0

@Oogernad 0 / 0 / 0 Регистрация: 20.04.2020 Сообщений: 4
	20.04.2020, 20:58 [ТС]
	Это было в задании дано умник я ничего не придумывала 0