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

Вывести номера столбцов матрицы, содержащих только отрицательные элементы (Pascal -> C++) - C++

Войти
Регистрация
Восстановить пароль
Другие темы раздела
C++ Проверить, чтобы длина строки файла была не меньше двух символов http://www.cyberforum.ru/cpp-beginners/thread1218922.html
Помогите пожалуйста решить. Текст в файле: имя пользователя. Проверить ,чтобы длина строки ббыла не меньше двух символов.
C++ Определить, упорядочены ли в массиве по возрастанию четные числа не могу понять в чём проблема и почему не работает Дана последовательность целых чисел a1, ..., an. Определить, упорядочены ли в ней по возрастанию четные числа (дополнительный массив использовать... http://www.cyberforum.ru/cpp-beginners/thread1218915.html
C++ В одномерном массиве произвести сортировку элементов по убыванию
В одномерном массиве произвести сортировку элементов по убыванию, используя один из алгоритмов быстрой сортировки. Необходимо сделать с входным файлом. Во входном файле: В первой строке...
Как распознать объект? C++
Имеется каталог картинок (папка с картинками). Размеры картинок (высота, ширина) одинаковые. Картинки появляются на экране. Нужно найти картинку на экране и записать в массив имя файла из каталога,...
C++ Суммы первых и последних элементов каждого массива записать в новый бинарный файл http://www.cyberforum.ru/cpp-beginners/thread1218881.html
помогите решить задачи на завтрашний экзамен не могу получить допуск, вылетаю со стипендии точнее, коды есть, но ничего не работает бинарные файлы: 2. Компоненты бинарного файла – целочисленные...
C++ Поменять местами первый и последний отрицательные компоненты бинарного файла помогите решить задачи на завтрашний экзамен не могу получить допуск, вылетаю со стипендии точнее, коды есть, но ничего не работает бинарные файлы: 1. Компоненты бинарного файла – вещественные... подробнее

Показать сообщение отдельно
Mili
0 / 0 / 0
Регистрация: 10.01.2014
Сообщений: 22

Вывести номера столбцов матрицы, содержащих только отрицательные элементы (Pascal -> C++) - C++

28.06.2014, 15:55. Просмотров 1394. Ответов 1
Метки (Все метки)

Дана вещественная матрица размерности (n x m). Вывести номера столбцов, содержащих только отрицательные элементы.
написано в раскале, а с переводом в с++ возникла трудность

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
26
27
28
29
30
31
32
33
34
35
36
37
38
Uses crt;
const Nmax = 10; //максим. размер матрицы
type Matrix = array [ 1 .. Nmax , 1 ..Nmax ] of real; //объявление типа
var
 Mas: Matrix; //объявление массива
 i, j, n, m, index, count: integer;//объявление целых переменных
begin
clrscr;//очистка экрана
repeat
 write('Enter n( 2<=n<=10 ):');readln(n); //Ввод количества строк
 write('Enter n( 2<=m<=10 ):');readln(m); //Ввод количества столбцов
until ( n in [ 2 .. 10 ] ) and ( m in [ 2 .. 10 ] );//Проверяем являются ли заданные величины в диапозоне 2..10,если нет повторяем предыдущие действия
 
for i:=1 to n do begin
 for j:=1 to m do begin
     write('Mas[',i,',',j,']= ');readln(Mas[i,j]);  //Считываем каждый элемент массива
 end;
end;
 
clrscr;
 
for i:=1 to n do begin
 for j:=1 to m do begin
     write(Mas[i,j]:0:0,' ');  //Выводим массив на экран
 end;
writeln; //переход на новую строку
end;
 
writeln;//переход на новую строку
for j:=1 to m do begin //В каждом столбце
count:=0;
 for i:=1 to n do //находим количество отриц. элементов
     if ( Mas[i,j] < 0 ) then inc(count);//Если элемент отриц. увеличиваем переменную на 1
     if ( count = m ) then write(j,' ');//Если количество отриц. элементов совпало с количеством строк значит все элементы столбца отрицательны,а потому выводим его номер
end;
 
readln;//пауза чтобы пользователь мог увидеть результат работы программы
end.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
 
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2017, vBulletin Solutions, Inc.
Рейтинг@Mail.ru