ЕВ
Евгений Владимирович

Для одномерного масива (0.1, -25.2, 0, 888.35, -424.48, 0, 15, -7,-195, 2, 0, 0,04, -15,2; 57,6) посчитать количество по



Для одномерного масива (0.1, -25.2, 0, 888.35, -424.48, 0, 15, -7,-195, 2, 0, 0,04, -15,2; 57,6) посчитать количество положительных элементов масива и вывести на печать результаты.

Анастасия
Анастасия

закончи задание

ОА
Оксана Антоневич

//Pascal

uses crt;
var
a: array [0..17] of real;
i:integer;

begin

//ВВодим масив чисел
for i:=1 to 17 do
begin
readln(a);
end;

//Ищем всех кто больше нуля и выводим их
for i:=1 to 17 do
begin
if a>0 then write(a,',')
end;

end.

Похожие вопросы
Как в С++ посчитать количество цифр после запятой???
как без цикла посчитать количество тегов в строке php
Потогите с Visual Basic, как в одномерном масиве задать отбор чисет от 60 до 73
как посчитать количество нулей в одномерном массиве? программа с++. напишите код программы
посчитать количество нулей в такой программе:
как в экселе посчитать количество нужных мне значений?
В одномерном масиве нужно просортировать каждую строчку по возрастанию элементов. Нужно написать программу на языке Си
В программе описан одномерный целочисленный массив с индексами от 0 до 10.
Как посчитать количество знаков в ячейке Excel
найти количество и произведение отрицательных элементов одномерного массива в С++