Pascal (Паскаль)

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

Войти

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

Другие темы раздела
Pascal Составить блок схему к готовому коду https://www.cyberforum.ru/ pascal/ thread1733653.html Помогите сделать блок схему, кому не сложно const n = 5; type matrix = array of integer; var	Pascal Составить блок схему к готовому коду Помогите сделать блок схему, кому не сложно uses crt; const n=10; var a:array of integer; i,j,k,r,max:integer; sred:real; begin clrscr;
Pascal Составить блок схему к готовому коду Помогите сделать блок схему, кому не сложно var ar: Array Of ShortInt; i, j, n, m: Byte; begin Randomize(); repeat Write('Input n='); ReadLn(n); https://www.cyberforum.ru/ pascal/ thread1733648.html	Pascal Найти значение выражения https://www.cyberforum.ru/ pascal/ thread1733589.html Дано векторы a и b, состоящие из десяти компонентов. Вычислить: (Min(ai+Bi)+MAX(Ai-Bi))/(Min(ai)+max(Bi))
Сортировка вставками «с конца массива» последовательным поиском с начала массива Pascal Сортировка вставками «с конца массива» последовательным поиском с начала массива.	Pascal Заполнить матрицу змейкой https://www.cyberforum.ru/ pascal/ thread1733545.html :help: Дано натуральное N (1 ≤ N ≤ 10). Заполнить матрицу порядка NN целыми числами 0, 1, 2, 3, …, N2–1 в соответствии со схемой расположения: 0 1 2 3 6 5 4 15 7 8 14 13 9 10 11 12 Найти соотношение между значением элемента K и его индексами , то есть функцию вида F(K, N) = <i, j>, которая по номеру K элемента в змейке возвращает его координаты в матрице <i, j>; другими...
Pascal Заполнить массив змейкой Заполнить массив MxN "змейкой" по столбцам. Пример: 1 10 11 20 21 2 9 12 19 22 3 8 13 18 23 4 7 14 17 24 5 6 15 16 25 https://www.cyberforum.ru/ pascal/ thread1733542.html	Перевести программу с С++ на Паскаль Pascal Помогите пожалуйста перевести, заранее спасибо #include <algorithm> #include <iostream> #include <cstdio> using namespace std; int a; int main()
Pascal Перевод в различные системы счисления https://www.cyberforum.ru/ pascal/ thread1733337.html Здравствуйте, возникла проблема, не могу разобраться с преобразованием числа в обратный и дополнительный код. Если с переводом из одной сс в другую все более-менее ясно, то здесь я явно что-то напортачила Заранее благодарю за отзывы и помощь Задание: Исходный файл содержит числа в шестнадцатеричной системе счисления, отделенные друг от друга запятыми. Составить программу, которая для каждого...	Pascal Разделить число M на 2 N раз https://www.cyberforum.ru/ pascal/ thread1733327.html Нужно написать программу которая делит число M на 2 N раз то есть 40/2 20/2 10/2 и так N раз и вывести ответ
Pascal Реализуйте алгоритм бинарного поиска Помогите пожалуйста перевести программу с С++ на Паскаль, заранее спасибо #include <algorithm> #include <iostream> #include <cstdio> using namespace std; int a; int main()	Pascal Написать программу, которая генерирует четырехзначное число и определяет, есть ли в числе одинаковые цифры https://www.cyberforum.ru/ pascal/ thread1733169.html Написать программу, которая генерирует четырехзначное число и определяет, есть ли в числе одинаковые цифры.

Peoples

1624 / 954 / 782

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

Сообщений: 2,452

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

13.05.2016, 12:06

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

13.05.2016, 12:06. Показов 2063. Ответов 1

Метки (Все метки)

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

Решение

Pascal

program pr;
 
var
  a: array [1..100] of integer;
  i, n, coutp, couto: integer;
 
begin
  coutp := 0;
  couto := 0;
  writeln('Введите размер массива');
  readln(n);
  for i := 1 to n do
  begin
    a[i] := random(21) - 10;
    write(a[i]:3);
  end;
  for i := 1 to n do
  begin
    if a[i] > 0 then
      coutp := coutp + 1;
  if a[i] < 0 then
    couto := couto + 1;
    end;
  writeln;
  writeln('Количество положительных элементов ', coutp);
  writeln('Количество отрицательных элементов ', couto);
end.

Вернуться к обсуждению:
В одномерном массиве подсчитать количество положительных и отрицательных чисел Pascal

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

cpp_developer

Эксперт

20123 / 5690 / 1417

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

Сообщений: 22,546

Блог

13.05.2016, 12:06

Готовые ответы и решения:

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

Сравнить количество положительных и отрицательных чисел в одномерном массиве
Помогите, пожалуйста.. №5. Напишите программу, которая вводит с клавиатуры 20 реальных чисел,...

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

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

	13.05.2016, 12:06

raxper

Эксперт

30234 / 6612 / 1498

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

Сообщений: 21,154

Блог

13.05.2016, 12:06

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

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

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

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

В одномерном массиве подсчитать количество отрицательных элементов
Задача стоит такая: В одномерном массиве подсчитать количество отрицательных элементов,если их...

Подсчитать количество отрицательных элементов в одномерном массиве A[10]
Подсчитать количество отрицательных элементов в одномерном массиве A Массив заполняется вручную,...

Подсчитать количество положительных элементов в одномерном массиве
Описать одномерный массив для нечетных вариантов как MAS1 dw (перечислить 10 элементов). Подсчитать...

Новые блоги и статьи
Книги и учебные ресурсы по C# InfoMaster 08.01.2025 Базовые учебники и руководства Одной из лучших книг для начинающих является "C# 10 и . NET 6 для начинающих" Эндрю Троелсена и Филиппа Джепикса . Книга последовательно раскрывает основные концепции. . .	Что такое NullReferenceException и как исправить? InfoMaster 08.01.2025 NullReferenceException - одно из самых распространенных исключений, с которым сталкиваются разработчики на C#. Это исключение возникает при попытке обратиться к членам объекта (методам, свойствам или. . .	Что такое Null Pointer Exception (NPE) и как это исправить? InfoMaster 08.01.2025 Null Pointer Exception (NPE) - это одно из самых распространенных исключений в Java, которое возникает при попытке использовать ссылку на объект, значение которой равно null. Это исключение относится. . .	Русский язык в консоли C++ InfoMaster 08.01.2025 При разработке программ на C++ одной из частых проблем, с которой сталкиваются русскоязычные программисты, является корректное отображение кириллицы в консольных приложениях. Эта проблема особенно. . .	Telegram бот на C# InfoMaster 08.01.2025 Разработка ботов для Telegram стала неотъемлемой частью современной экосистемы мессенджеров. C# предоставляет мощный и удобный инструментарий для создания разнообразных ботов, от простых. . .	Использование GraphQL в Go (Golang) InfoMaster 08.01.2025 Go (Golang) является одним из наиболее популярных языков программирования, используемых для создания высокопроизводительных серверных приложений. Его архитектурные особенности и встроенные. . .
Что лучше использовать при создании класса в Java: сеттеры или конструктор? Alexander-7 08.01.2025 Вопрос подробнее: На вопрос: «Когда одновременно создаются конструктор и сеттеры в классе – это нормально?» куратор уточнил: «Ваш класс может вообще не иметь сеттеров, а только конструктор и геттеры. . .	Как работать с GraphQL на TypeScript InfoMaster 08.01.2025 Введение в GraphQL и TypeScript В современной разработке веб-приложений GraphQL стал мощным инструментом для создания гибких и эффективных API. В сочетании с TypeScript, эта технология. . .	Счётчик на базе сумматоров + регистров и генератора сигналов согласования. Hrethgir 07.01.2025 Создан с целью проверки скорости асинхронной логики: ранее описанного сумматора и предополагаемых fast регистров. Регистры созданы на базе ранее описанного, предполагаемого fast триггера. То-есть. . .	Как перейти с Options API на Composition API в Vue.js BasicMan 06.01.2025 Почему переход на Composition API актуален В мире современной веб-разработки фреймворк Vue. js продолжает эволюционировать, предлагая разработчикам все более совершенные инструменты для создания. . .	Архитектура современных процессоров inter-admin 06.01.2025 Процессор (центральный процессор, ЦП) является основным вычислительным устройством компьютера, которое выполняет обработку данных и управляет работой всех остальных компонентов системы. Архитектура. . .	История создания реляционной модели баз данных, правила Кодда Programming 06.01.2025 Предпосылки создания реляционной модели В конце 1960-х годов компьютерная индустрия столкнулась с серьезными проблемами в области управления данными. Существовавшие на тот момент модели данных -. . .

Наверх