Вычислить количество элементов массива не большых заданого числа А

26.01.2010, 00:06. **Показов** 1046. **Ответов** 1

Author24 — интернет-сервис помощи студентам

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

@Mr.Loner · 26.01.2010, 00:16

Pascal

const A:=3.14;
var arr:array[1..10] of real, i,n:integer;
begin
{заполнение...}
{...}
n:=0;
for i:=1 to 10 do
    if arr[i]<=A then
        inc(n);
write(n);
readln;
end.

Sashka-Ice
		1
	Вычислить количество элементов массива не большых заданого числа А 26.01.2010, 00:06. Показов 1046. Ответов 1 Метки нет (Все метки) Задание. Вычислить количество элементов массива не большых заданого числа А. Длина массива 10. Тип элементов массива REAL.

	26.01.2010, 00:16

Вычислить количество элементов массива не большых заданого числа А

Решение