Сумма элементов массива

@vVv · Регистрация: 09.10.2014

Найти сумму всех элементов массива А, у которых число десятков (вторая с конца цифра десятичной записи) больше, чем число единиц.

@Puporev · 20.11.2014, 18:37

Pascal

1
2
3

s:=0;
for i:=1 to n do
if a[i] div 10 mod 10>a[i] mod 10 then s:=s+a[i];

@vVv 0 / 0 / 0 Регистрация: 09.10.2014 Сообщений: 6
		1
	Сумма элементов массива 20.11.2014, 18:35. Показов 2024. Ответов 1 Метки нет (Все метки) Найти сумму всех элементов массива А, у которых число десятков (вторая с конца цифра десятичной записи) больше, чем число единиц. 0

	20.11.2014, 18:37

Опции темы

Решение