Дан массив размера 20 и целые числа k и l. найти сумму элементов массива с номерами от k до l включительно

пецааааа1 пецааааа1    1   01.07.2019 06:20    0

Ответы
lazyseal1488 lazyseal1488  24.07.2020 16:30
Var ar:array[1..20] of integer;
k,l,a,b:integer;
begin
randomize;
readln(k);
readln(l);
for a:=1 to 20 do
ar[a]:=random(a);
for a:=k to l do
b:=b+ar[a];
writeln(b);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика