Дан массив К(N), N=12. Знаменито, что в массиве есть один элемент,

Дан массив К(N), N=12. Знаменито, что в массиве есть один элемент, значение которого одинаково 100. Найти его порядковый номер. Вычислить сумму значений частей массива, стоящих в массиве перед элементом, значение которого одинаково 100.

Задать свой вопрос
1 ответ

var

i, imax, sum: integer;

mas: array[1..12] of integer;

begin

for i:=1 to 12 do

read(mas[i]);

writeln;

for i:=1 to 12 do

if (mas[i]=100) then

begin

 imax:= i;

 break;

end;

for i:=1 to imax-1 do

inc(sum, mas[i]);

write('Сумма = ', sum);

end.

Volodja Policejmakov
Я хотела 5 звезд поставить
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт