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

QBasic

Форум программистов и сисадминов Киберфорум

Войти

Регистрация
Восстановить пароль

Рейтинг 5.00/6:

@samvel00077 0 / 0 / 0 Регистрация: 10.04.2011 Сообщений: 61
		1
	Подсчитать и вывести на количество положительных чисел в массиве 10.04.2011, 13:05. Показов 1190. Ответов 1 Метки нет (Все метки) Массив состоящий из 4 сток и 5 столбцов, заполнить случайными числами от -20 до 20 и вывести на экран Подсчитать и вывести на количество положительных чисел в полученном массиве. Помогите Плиз 0

Заказать работу у эксперта

Лучшие ответы (1)

Сообщение: #1537395

IT_Exp

Эксперт

34794 / 4073 / 2104

Регистрация: 17.06.2006

Сообщений: 32,602

Блог

10.04.2011, 13:05

Ответы с готовыми решениями:

Подсчитать и вывести на экран количество положительных четных чисел в массиве
Пользователь вводит с клавиатуры натуральное число не больше 100 которое сохраняется в перменную n,...

Подсчитать и вывести на экран количество положительных чётных чисел в массиве
1. Пользователь вводит с клавиатуры натуральное число не большее 100, которое сохраняется в...

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

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

Quiet Snow

Кормпилятор

5036 / 1708 / 409

Регистрация: 25.04.2010

Сообщений: 4,795

Записей в блоге: 2

10.04.2011, 13:15

Сообщение было отмечено Памирыч как решение

Решение

PureBasic

  CLS
  DIM A(5, 4)
    RANDOMIZE TIMER
  FOR y = 1 TO 4
     FOR x = 1 TO 5
     A(x, y) = (RND * 40) - 20
     PRINT A(x, y);
     NEXT: PRINT
  NEXT
  FOR y = 1 TO 4
     FOR x = 1 TO 5
      IF A(x, y) > 0 THEN k = k + 1
  NEXT x, y
  PRINT "Pologitelnyh : "; k

	10.04.2011, 13:15

BasicMan

Эксперт

29316 / 5623 / 2384

Регистрация: 17.02.2009

Сообщений: 30,364

Блог

10.04.2011, 13:15

Помогаю со студенческими работами здесь

В массиве целых чисел подсчитать количество чётных положительных чисел, меньших 40
В массиве целых чисел подсчитать количество чётных положительных чисел, меньших 40. Вывести...

В массиве целых чисел подсчитать количество нечётных положительных чисел, больших 50
В массиве целых чисел подсчитать количество нечётных положительных чисел, больших 50. Вывести...

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

В произвольном числовом массиве подсчитать количество положительных чисел и их сумму, колличество отрицательных чисел и их произведения
в произвольном числовом массиве подсчитать количество положительных чисел и их сумму, колличество...

В массиве подсчитать количество положительных чисел с нечётными номерами
Ребят помогите написать программу!!! В массиве подсчитать: количество положительных чисел с...

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

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

Или воспользуйтесь поиском по форуму:

Новые блоги и статьи
Как написать микросервис на Go/Golang InfoMaster 14.01.2025 Определение микросервиса, преимущества использования Go/ Golang Микросервис – это архитектурный подход к разработке программного обеспечения, при котором приложение состоит из небольших, независимо. . .	Как написать микросервис с нуля на C# InfoMaster 14.01.2025 В современном мире разработки программного обеспечения микросервисная архитектура стала стандартом де-факто для создания масштабируемых и гибких приложений. Этот архитектурный подход предполагает. . .	Как создать интернет-магазин на PHP и JavaScript InfoMaster 14.01.2025 В современном мире электронная коммерция стала неотъемлемой частью бизнеса. Создание собственного интернет-магазина открывает широкие возможности для предпринимателей, позволяя достичь большей. . .	Как написать Тетрис на Ассемблере InfoMaster 14.01.2025 Тетрис – одна из самых узнаваемых и популярных компьютерных игр, созданная в 1984 году советским программистом Алексеем Пажитновым. За прошедшие десятилетия она завоевала симпатии миллионы людей по. . .	Как создать игру "Танчики" на Unity3d и C# InfoMaster 14.01.2025 Разработка игр – это увлекательный процесс, сочетающий в себе творчество и технические навыки. В этой статье мы рассмотрим создание классической игры "Танчики" с использованием Unity3D и языка. . .	Организую платный онлайн микро-курс по доработке Android-клиента Telegram _Ivana 14.01.2025 Официальная версия и распространенные форки не полностью устраивают? Сделай свою кастомную версию клиента! 4 занятия по 2 часа (2 недели пн, ср 19:00-21:00 по Москве). Первое вводное занятие. . .
Как создать приложение для фитнеса для iOS/iPhone на Kotlin InfoMaster 14.01.2025 Создание собственного фитнес-приложения — это не только захватывающий, но и полезный процесс, ведь оно может стать вашим верным помощником на пути к здоровому и активному образу жизни. В современных. . .	Как создать приложение магазина для iOS/iPhone на Swift InfoMaster 14.01.2025 Введение в разработку iOS-приложений Разработка приложений для iPhone и других устройств на базе iOS открывает огромные возможности для создания инновационных мобильных решений. В данной статье мы. . .	Это работает. Скорость асинхронной логики велика. Вопрос видимо останется в стабильности. Плата - огонь! Hrethgir 13.01.2025 По прошлому проекту в Logisim Evolution https:/ / www. cyberforum. ru/ blogs/ 223907/ blog8781. html прилагаю файл архива проекта в Gowin Eda. Восьмибитный счётчик из сумматора+ генератор сигнала. . .	UserScript для подсветки кнопок языков программирования в зависимости от текущего раздела volvo 13.01.2025 В результате работы этого скрипта подсвечиваются нужные кнопки не только в форме быстрого ответа, но и при редактировании сообщения: / / ==UserScript== / / @name CF_DefaultLangSelect / / . . .	Введение в модели и алгоритмы машинного обучения InfoMaster 12.01.2025 Машинное обучение представляет собой одну из наиболее динамично развивающихся областей искусственного интеллекта, которая фокусируется на разработке алгоритмов и методов, позволяющих компьютерам. . .	Как на Python создать нейросеть для решения задач InfoMaster 12.01.2025 В контексте стремительного развития современных технологий особое внимание уделяется таким инструментам, как нейросети. Эти структуры, вдохновленные биологическими нейронными сетями, используются для. . .

Наверх