Предмет: Информатика, автор: Ministreliya99

ПОМОГОТЕ!!!!! ОЧЕНЬ СРОЧНО!!!!!
Ввести из текстового файла одномерный целочисленный массив из 9 элементов. Подсчитать, сколько в нём отрицательных, положительных и нулевых элементов.

Ответы

Автор ответа: Аноним
0
// PascalABC.NET 3.2, сборка 1344 от 22.11.2016
begin
  var a:=ReadAllText('filein.txt').ToIntegers; a.Println;
  (var p,var z, var n):=(0,0,0);
  foreach var k in a do
    if k>0 then p+=1
    else
      if k=0 then z+=1 else n+=1;
  Writeln('Положительных ',p,', нулей ',z,' отрицательных ',n)
end.

Пример
-5 8 3 11 7 0 -2 7 4
Положительных 6, нулей 1 отрицательных 2

Вас так не учили? Печально! Осваивайте современную технику программирования!
Приложения:
Автор ответа: Ministreliya99
0
Мы такого не изучаем
Автор ответа: Аноним
0
А это ваши проблемы! Вы не то, чтобы версию изучаемого языка не указали, Вы не указали даже на каком языке писать!
Автор ответа: Ministreliya99
0
На паскале abc можно? Пожалуйста)
Автор ответа: Аноним
0
Нет, нельзя. Вы вообще не указали в вопросе, какой язык нужен, а теперь вдруг возжелали конкретную версию. С чего я буду дважды решать одно и то же из-за Вашей безалаберности и неуважения к чужому труду?
Похожие вопросы
Предмет: Алгебра, автор: ddiiaannaahjhj