Паскаль. Массивы. - Помощь студентам

Sashka-Ice · 26.01.2010, 00:04

Задание. Вычислить количество элементов массива не большых заданого числа А. Длина массива 10. Тип элементов массива REAL.

profi · 26.01.2010, 00:06

Код:

for i:=1 to 10 do
if a[i] < A then inc(kol);

Базиля · 26.01.2010, 03:20

profi
думаю точнее будет

Код:

for i:=1 to 10 do
if a[i] <= A then inc(kol);

26.01.2010, 00:04	#1
Sashka-Ice Новичок Джуниор Регистрация: 25.01.2010 Сообщений: 1	Паскаль. Массивы. Задание. Вычислить количество элементов массива не большых заданого числа А. Длина массива 10. Тип элементов массива REAL.

26.01.2010, 00:06	#2
profi Участник клуба Подтвердите свой е-майл Регистрация: 19.11.2007 Сообщений: 1,022	Код: `for i:=1 to 10 do if a[i] < A then inc(kol);`

26.01.2010, 03:20	#3
Базиля Участник клуба Регистрация: 03.12.2009 Сообщений: 1,013	profi думаю точнее будет Код: `for i:=1 to 10 do if a[i] <= A then inc(kol);`