Помогите написать задачу : дан массив действительных чисел размерность которых н подсчитать сколько в них отрицательных,положительных и нулевых элементов! Помогите пожалуйста!
Mr_SeReG@, n1 := 0; n2 := 0; n3 := 0; for i := 1 to n do if a[ i] > 0 then inc(n1) else if a[ i] < 0 then inc(n2) else inc(n3); // теперь n1 - количество положительных, n2 - отрицательных и n3 - равных 0 чисел в массиве a длиной n.
Сегодня, в рамках подготовки к олимпиаде, решал задачки. Понравилась одна штучка. Написать программу, которая выводит количество знаков в десятичной записи факториала введенного числа. Входящее число в пределах от 1 до 3000. Пример входа: 200 выход: 375.
24 авг 2010 в 19:20