Форум программистов, компьютерный форум, киберфорум
Наши страницы

QBasic

Войти
Регистрация
Восстановить пароль
 
236
0 / 0 / 0
Регистрация: 26.12.2011
Сообщений: 5
#1

Подсчитать отдельно общее количество положительных и отрицательных элементов массива - QBasic

26.12.2011, 22:30. Просмотров 704. Ответов 1
Метки нет (Все метки)

Даны одномерные массивы X(N) и Y(M),N<=10, M<=15. Подсчитать отдельно общее количество положительных и отрицательных элементов массив.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
26.12.2011, 22:30
Здравствуйте! Я подобрал для вас темы с ответами на вопрос Подсчитать отдельно общее количество положительных и отрицательных элементов массива (QBasic):

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

Подсчитать количество отрицательных элементов массива - QBasic
Предусмотреть в программе ВЫВОД полученного результата. Помогите решить 2 задачи... 1 задача:&quot;Ввести в память машины массив A(N) ,...

Подсчитать количество положительных элементов массива - QBasic
Заданы одномерные массивы A(N),B(M),C(L).Для каждого из них: 1)Подсчитать количество положительных элементов 2)Целочисленные элементы в...

Подсчитать количество положительных элементов массива - QBasic
Заданы одномерные массивы A(N),B(M),C(L). Для каждого из них: 1) Подсчитать количество положительных элементов; 2) Целочисленные...

Вычислить сумму и количество положительных и отрицательных элементов массива - QBasic
Задание: Вычислить сумму и количество положительных и отрицательных элементов массива D(n), установить каких (положительных или...

Определить сумму отрицательных и количество положительных элементов массива X(n) - QBasic
4.1 Определить сумму отрицательных и количество положительных элементов массива X(n). Вывести массив и полученные значения. Упорядочить...

1
Фаер
640 / 369 / 68
Регистрация: 09.12.2011
Сообщений: 733
Записей в блоге: 35
27.12.2011, 17:07 #2
PureBasic
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
26
cls
1 input "n="; n
if n>10 then print "Wromg n": goto 1
2 input "m="; m
if m>15 then print "Wrong m": goto 2
cls
dim x(n): dim y(m)
 
for i=1 to n
  x(i)=rnd*20-rnd*10: color 2: print x(i)
  if x(i)>0 then pol=pol+1 else
  if x(i)<0 then otr=otr+1
next
 
color 4: print "pol:"; pol : color 14: print "otr:"; otr
otr=0: pol=0
 
for i=1 to m
  y(i)=rnd*20-rnd*10: color 8: print y(i)
  if y(i)>0 then pol=pol+1 else
  if y(i)<0 then otr=otr+1
next
 
color 4: print "pol:" ; pol
color 14: print "otr:"; otr
end
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
27.12.2011, 17:07
Привет! Вот еще темы с ответами:

Найти сумму положительных и количество отрицательных элементов массива - QBasic
Дан массив из 10 элементов найти сумму положительных и кол-во отрицательных. если можете помогите заранее спасибо

Вычислить сумму и количество положительных и отрицательных элементов массива - QBasic
Обработать на компе одномерный массив D(N): вычислить сумму и количество положительных и отрицательных элементов массива, установить...

Подсчитать количество отрицательных и положительных чисел - QBasic
Помогите, пожалуйста. Дан одномерный массив из 20 элементов. Составить программу, которая подсчитывает количество отрицательное и...

Вычислить сумму и количество положительных, сумму и количество отрицательных элементов массива - QBasic
Помогите пожалуйста сдалать следующие 2 задачи : 1)вычислить сумму и количество положительных, сумму и количество отрицательных элементов...


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

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

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.