В массиве из 10 целых чисел подсчитать сумму

элементов, стоящих правее минимального. на паскале

Question

Информатика

Апросинья

7 декабря, 11:04

В массиве из 10 целых чисел подсчитать сумму

элементов, стоящих правее минимального. на паскале

+1

Ответы (1)

Знаете ответ?

Пета · Answer 1

Uses crt;

const n=10;

var a:array[1 ... n] of integer;

s, i, min, k:integer;

begin

min:=1000;

for i:=1 to n do

begin

readln (a[i]) ;

if a[i]
end;

s:=0;

for i:=k+1 to n do

s:=s+a[i];

writeln (s) ;

end.

В массиве из 10 целых чисел подсчитать суммуэлементов, стоящих правее минимального. на паскале

В массиве из 10 целых чисел подсчитать сумму

элементов, стоящих правее минимального. на паскале