Напишите программу на паскале, которая считывает - вопрос №10426985 от trikozatatjana1 27.07.2022 18:54

Question

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

trikozatatjana1 · Answer

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....