Найти сумму всех элементов массива, кроме элементов с номерами от K до L включительно.

@сара93 · Регистрация: 01.11.2011

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

Дан массив размера N и целые числа K и L (1 < K ≤ L ≤ N). Найти сумму всех элементов массива, кроме элементов с номерами от K до L включительно.
помогите плииз

@Igor · 02.11.2011, 23:03

Pascal

uses crt;
const n=10;
var m:array[1..100]of integer;
    i,k,l,s:integer;
begin
randomize;
for i:=1 to n do
begin
m[i]:=-10+random(21);
write(m[i],' ');
end;
writeln;
writeln;
write('K = ');
read(k);
write('L = ');
read(l);
s:=0;
for i:=1 to n do
begin
if (i<k) or (i>l) then
s:=s+m[i];
end;
writeln;
write('S = ',s);
end.

@сара93 · 03.11.2011, 10:47 **[ТС]**

спасибо большое

@сара93 0 / 0 / 0 Регистрация: 01.11.2011 Сообщений: 29
		1
	Найти сумму всех элементов массива, кроме элементов с номерами от K до L включительно. 02.11.2011, 22:57. Показов 1470. Ответов 2 Метки нет (Все метки) Дан массив размера N и целые числа K и L (1 < K ≤ L ≤ N). Найти сумму всех элементов массива, кроме элементов с номерами от K до L включительно. помогите плииз 0

@сара93 0 / 0 / 0 Регистрация: 01.11.2011 Сообщений: 29
	03.11.2011, 10:47 [ТС]	3
	спасибо большое 0

Опции темы

Найти сумму всех элементов массива, кроме элементов с номерами от K до L включительно.

Решение