Ответы на вопрос:
желательно в уточнять тип массива (целый, вещественный ) и споособ его генерации(ввод с клавиатуры, генератор случайных чисел).
в данной программе массив получен с генератора случайных чисел
program raznost;
uses crt;
const n=100; {максимальный размер массива}
var a: array[1..n] of integer;
i,m: integer;
k,s,rez: longint;
begin
clrscr;
write('введите к: ');
readln(k);
write('введите размер массива < 100: ');
readln(m);
randomize;
write('исходный массив: ')
s: =0;
for i: =1 to m do
begin
a[i]: =random(50)+25;
write(i: 3);
if (i mod 2)< > 0 then s: =s+a[i];
end;
writeln;
rez: =k-s;
writeln('разность между k и суммой всех элементов массива с нечетными индексами=',rez);
readkey;
end.
Популярно: Информатика
-
voenngti11.03.2020 19:22
-
nebylobyagjjhgf21.07.2022 23:24
-
Hyun7929.07.2021 04:28
-
gilkatay115.02.2020 15:15
-
aydarsadikov21.05.2022 14:47
-
idkfndnf23.09.2020 04:58
-
alinapopova99723.12.2022 08:31
-
Tanecka250119.05.2023 09:26
-
РУСЛАН11322810.09.2022 07:11
-
KraRom22.07.2020 23:17