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

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

Рубрика Программирование, компьютеры и кибернетика
Вид контрольная работа
Язык русский
Дата добавления 16.10.2017
Размер файла 75,8 K

Отправить свою хорошую работу в базу знаний просто. Используйте форму, расположенную ниже

Студенты, аспиранты, молодые ученые, использующие базу знаний в своей учебе и работе, будут вам очень благодарны.

Размещено на http://www.allbest.ru/

Задание

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

Отрицательные элементы: номер1, номер2,…

Положительные элементы: номер1, номер2,…

Нулевые элементы: номер1, номер2,…

Описание алгоритма решения задания

Ввод пользователем количества строк и столбцов

Заполнение матрицы (массива) рандомными значениями

Вывод на экран получившейся матрицы

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

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

Подсчет количества нулевых чисел и вывод номеров этих чисел на экран

Описание переменных и подпрограмм

программа алгоритм экран пользователь

В программе используются следующие переменные:

i,j -вспомогательные переменные типа Byte

N,M -переменные типа Byte хранящие количество строк и столбцов соответственно

a,b,c -переменные типа Integer хранящие количество положительных, отрицательных и нулевых элементов соответственно

х -переменная типа Array. х в нашей программе - это двумерный массив, каждая ячейка которого хранит элементы матрицы

Текст программы

Program KW;

Uses

Crt;

Var

i,j,N,M:byte;

a,b,c:integer;

x:array[1..10,1..10] of integer;

Begin

ClrScr;

Randomize;

Writeln('Введите размеронсть матрицы: ');

Write('Количество строк: ');

Readln(N);

Write('Количетсво столбцов: ');

Readln(M);

for i:=1 to N do

for j:=1 to M do

x[i,j]:=20-Random(40);

Writeln('Исходная матрица:');

for i:=1 to N do

for j:=1 to M do

Begin

if j<>M then Write(x[i,j]:3,' ')

else Writeln(x[i,j]:3);

End;

Writeln;

Writeln('Отрицательные элементы:');

for i:=1 to N do

for j:=1 to M do

if x[i,j]<0 then

Begin

inc(c);

Write('[',i,';',j,'] ');

if c mod 6 =0 then Writeln;

End;

Writeln;

Writeln('Всего: ',c);

Writeln;

Writeln('Положительные элементы:');

for i:=1 to N do

for j:=1 to M do

if x[i,j]>0 then

Begin

inc(a);

Write('[',i,';',j,'] ');

if a mod 6 =0 then Writeln;

End;

Writeln;

Writeln('Всего: ',a);

Writeln;

Writeln('Нулевые элементы:');

for i:=1 to N do

for j:=1 to M do

if x[i,j]=0 then

Begin

inc(b);

Write('[',i,';',j,'] ');

if b mod 6 =0 then Writeln;

End;

Writeln;

Writeln('Всего: ',b);

Readln;

End.

Результат работы программы

При анализе работы программы, можно убедиться, что она работает правильно.

Размещено на Allbest.ru


Подобные документы

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

    лабораторная работа [946,5 K], добавлен 23.11.2014

  • Общая характеристика основ дисциплины "Теория чисел". Интерфейс, листинг и оценка положительных и отрицательных качеств программы-калькулятора CalcKurs, а также описание ее основных процедур – DelOstatok, Factor, NodNok, SuperGorner, Express и AntiExp.

    курсовая работа [1,9 M], добавлен 28.05.2010

  • Решения задачи графическим и программным способами. Описание алгоритма решения графическим способом, укрупненная схема алгоритма. Ввод элементов двумерного массива, вывод преобразованного массива, разработка программы на языке pascal, листинг программы.

    курсовая работа [115,5 K], добавлен 22.05.2010

  • Результат нахождения количества отрицательных чисел. Листинг программы, задача которой - удаление всех знаков препинания в символьной строке. Приложение вывода списка очередности предоставления мест в общежитии. Форма для расчета валютных операций.

    отчет по практике [3,8 M], добавлен 15.06.2015

  • Расчет необходимого объема памяти для записи книги, количества символов в тексте. Создание шестнадцатеричного кода фамилии с помощью таблицы кодировки. Описание алгоритма получения электронного письма. Расположение чисел в порядке их возрастания.

    контрольная работа [16,1 K], добавлен 05.07.2014

  • Алгоритм и код программы для создания исходного двоичного файла чисел с произвольным количеством элементов, чтения из файла действительных восьмибайтных элементов и подсчёта общего количества элементов файла. Вывод результата работы программы на экран.

    контрольная работа [1,0 M], добавлен 23.11.2014

  • Разработка программы на языке Pascal. Описание переменных. Действия, которые должна выполнить программа согласно выбранного алгоритма. Детализация графической части программы. Листинг и тестирование программы. Вывод массива данных на экран монитора.

    контрольная работа [360,4 K], добавлен 13.06.2012

  • Разработка программы обработки числовых последовательностей с кодом на языке Pascal, которая должна выполнять функции ввода количества чисел с клавиатуры, перебора всех возможных сочетаний элементов, определения их сумм и вывода информации на экран.

    практическая работа [432,0 K], добавлен 09.04.2010

  • Разработка ввода с клавиатуры и вывода на экран монитора данных с помощью стандартных функций printf и scanf. Ввод количества материальных точек. Работа с линейным списком. Хранение содержимого списка в блоке ячеек памяти с последовательными адресами.

    курсовая работа [176,8 K], добавлен 18.01.2016

  • Описание алгоритма решения задачи по вычислению суммы элементов строк матрицы с использованием графического способа. Детализация укрупненной схемы алгоритма и разработка программы для решения задачи в среде Turbo Pascal. Листинг и тестирование программы.

    курсовая работа [446,0 K], добавлен 19.06.2014

Работы в архивах красиво оформлены согласно требованиям ВУЗов и содержат рисунки, диаграммы, формулы и т.д.
PPT, PPTX и PDF-файлы представлены только в архивах.
Рекомендуем скачать работу.