Напишите программу на паскале, которая считывает число n, а затем ещё n чисел .
выведите сумму индексов чисел , оканчивающихся на 7 , нумерация с 1.

Anabella98 Anabella98    1   22.12.2019 05:21    1

Ответы
smellofcherry smellofcherry  05.08.2020 13:21

PascalABC.NET

begin

 var n := ReadInteger;

 var a := ReadArrInteger(n);

 var s := 0;

 for var i := 0 to a.High do

   if Abs(a[i]) mod 10 = 7 then

     s += i + 1;

 s.Println;    

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика

Популярные вопросы