Lalalaa
1

Вывести количество отрицательных, положительных и равных нулю элементов массива

14.04.2014, 18:07. Показов 1623. Ответов 2
Метки нет (Все метки)

дан целочисленный массив из 30 элементов.Вывести количество отрицательных,положительных и равных нулю элементов(массив записать в 1.txt)
Напишите,пожалуйста, код к этой программе!
__________________
Помощь в написании контрольных, курсовых и дипломных работ, диссертаций здесь
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
14.04.2014, 18:07
Ответы с готовыми решениями:

Найти количество элементов массива, равных нулю
в одномерном массиве состоящем из n вещественных элементов вычислить: 1. Количество элементов...

Найти количество элементов массива, равных нулю
Составить алгоритм и программу, которая в одномерном массиве, состоящем из n вещественных...

Определить количество положительных и количество отрицательных элементов массива
Определить количество положительных и количество отрицательных эле- ментов массива.

Определить количество положительных и количество отрицательных элементов массива
определить количество положительных и количество отрицательных элементов массива

2
60 / 60 / 46
Регистрация: 25.11.2011
Сообщений: 259
14.04.2014, 18:19 2
Лучший ответ Сообщение было отмечено как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
const n=30;
var i,kol1,kol2,kol3:integer;
     a = arrray[1..n] of integer;
     f1:text;
Begin
assign(f1, 'file1.txt'); 
rewrite(f1);    
for i:=1 to n do
 begin
 readln(a[i]);
 writeln(f1,a[i]);
end;
close(f1);
kol1:=0;kol2:=0;kol3:=0;
for i:=1 to n do
 begin
  if (a[i]>0) then inc(kol1);
  if (a[i]<0) then inc(kol2);
  if(a[i]=0) then inc(kol3);
 end;
 writeln('>0-',kol1);
 writeln('<0-',kol2);
  writeln('=0-',kol3);
 
End.
вроде так
1
Заблокирован
14.04.2014, 18:21 3
Pascal
1
2
3
4
uses crt;
var a:integer;
array[1..30] of integer;
if a<0 then write('отрицаетльный');
я не прогер конечно но кое-что умею
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
14.04.2014, 18:21
Помогаю со студенческими работами здесь

Найти произведение количества отрицательных элементов и количество положительных элементов массива
Прошу помощи. Задание: Задан одномерный, целочисленный массив A(n), (n&lt;=40).Найти произведение...

Для матрицы А подсчитать количество элементов, равных нулю. Переставить строки
Для матрицы А(m, n), 1&lt;(m, n)&lt;10, подсчитать количество элементов, равных нулю. Переставить строки...

Посчитать количество отрицательных, положительных и нулевых элементов массива
Заполнить массив случайными числами (положительными и отрицательными) из произвольного диапазона....

Подсчитайте произведение положительных элементов массива и количество отрицательных
Введите с клавиатуры одномерный массив А(N), элементами которого являются положительные и...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2022, CyberForum.ru