Turbo Pascal

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

Войти

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

Другие темы раздела
Turbo Pascal В массиве А после каждого отрицательного элемента вставить элемент с заданным значением https://www.cyberforum.ru/ turbo-pascal/ thread1576499.html Задание: В массиве А после каждого отрицательного элемента вставить элемент с заданным значением вот что у меня есть помоги подправить код program MyProgram; uses system;	Turbo Pascal Составить программу проверки, является ли данная таблица «хорошей» Назовем таблицу «хорошей», если сумма чисел, записанных в клетках любого пути из A в A одинакова. Составить программу проверки, является ли данная таблица «хорошей»
Turbo Pascal Определить в момент времени Т, какие спортсмены уже побывали в роли лидеров https://www.cyberforum.ru/ turbo-pascal/ thread1576439.html N спортсменов уходят со старта в моменты времени t1<t2<…<tn с постоянными скоростями v1,v2,…,vn. Опишите и реализуйте алгоритм, который определяет в момент времени Т, какие спортсмены уже побывали в роли лидеров	Turbo Pascal Отсортировать элементы каждого столбца матрицы по убыванию методом линейной вставки Дана действительная матрица A размерности n*n. Если среднее арифметическое максимального и минимального элементов первой строки равно среднему арифметическому максимального и минимального элементов последнего столбца, то отсортировать элементы каждого столбца матрицы по убыванию методом линейной вставки . В противном случае матрицу оставить без изменения. Нужно очень срочно, помогите пожалуйста. https://www.cyberforum.ru/ turbo-pascal/ thread1576428.html
Массив: В массиве пропущен элемент. Как на место пропуска поставить 1? Turbo Pascal Доброго времени суток. Дочке в школе подкинули задачку. В массиве пропущен элемент. Как на место пропуска поставить 1?	Turbo Pascal Найти количество слов в тексте Вважається довільні текстові файли. Розробити процедуру для розрахунку кількості слів у тексті; https://www.cyberforum.ru/ turbo-pascal/ thread1576402.html
Turbo Pascal Вывести на экран все элементы арифметической прогрессии меньшие ста Вывести на экран все элементы арифметической прогрессии, меньшие ста, где a=15 и d=11. https://www.cyberforum.ru/ turbo-pascal/ thread1576380.html	Вычислить предел последовательности Turbo Pascal Доброго времени суток. Был бы очень признателен, если б кто-нибудь помог с задачкой. Вычислить предел последовательности an, если значения a0,x вводятся, an вычисляется по правилу: an=(3an-1+x/(a3n-1))/4; с точностью до 0.5E-6. Заранее спасибо.
Turbo Pascal Файл не найден (ошибка №2) Пишет, ошибка №2, файл не найден uses crt; var f:text; c:char; begin clrscr; randomize; assign(f,'input.txt'); reset(f); while not eof(f) do https://www.cyberforum.ru/ turbo-pascal/ thread1576292.html	Turbo Pascal Построение и программная реализация конечно-автоматной модели алгоритма обработки числового массива Добрый День, помогите пожалуйста. В одномерном массиве, заполняемом целыми числами, найти участок между двумя отрицательными элементами с максимальной суммой элементов. Например, для массива 8 -9 10 -3 5 6 7 -1 3 5 0 1, ответ «5 6 7». https://www.cyberforum.ru/ turbo-pascal/ thread1576136.html
Среди N точек на плоскости (х1,у1), (х2,у2) определить точку наиболее удаленную от начала координат Turbo Pascal 2. Среди N точек на плоскости (х1,у1), (х2,у2)...(хn,yn). Определить точку наиболее удаленную от начала координат.	Turbo Pascal Составьте программу подсчета количества таких i, что Z[i] не меньше всех предыдущих элементов таблицы 1. Дан одномерный массив. Составьте программу подсчета количества таких i, что Z не меньше всех предыдущих элементов таблицы (Z, Z, ..., Z). https://www.cyberforum.ru/ turbo-pascal/ thread1576090.html

Alexkiller

0 / 0 / 1

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

Сообщений: 112

Определение номеров столбцов матрицы, не содержащих в качестве элемента заданное значение - Turbo Pascal - Ответ 8318153

10.11.2015, 00:13. Показов 1238. Ответов 10

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

Author24 — интернет-сервис помощи студентам

Ну в заголовке, в принципе, написано, какую программу надо написать. Вот, написал что-то похожее, но работает она только для матрицы с 2-мя строками. А вот как написать, чтобы она работала с любым кол-вом строк, помогите:

Pascal

Program Matrix;
var a: array [1..1000,1..1000] of integer;
var i, j, n, m, k: integer;
Begin
Write('Введите число: '); Readln(k);
Write('Введите кол-во строк: '); Readln(n);
Write('Введите кол-во столбцов: '); Readln(m);
for i:=1 to n do 
for j:=1 to m do begin
Readln(a[i,j]);
end;
for i:=1 to n do begin
for j:=1 to m do 
Write(a[i,j]:4);
writeln;
end;
for i:=1 to n do begin
for j:=1 to m do begin
if i>1 then
if (a[i-1,j]<>k) and (a[i,j]<>k) then writeln('Номер столбца без числа ', k, ' = ',j)
end;
end;
end.

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

Следующий ответ

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

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

Сообщение: #8318702 Сообщение: #8322689

Programming

Эксперт

39485 / 9562 / 3019

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

Сообщений: 41,671

Блог

10.11.2015, 00:13

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

Определение первого из столбцов, не содержащих ни одного отрицательного элемента
Здравствуйте, помогите, пожалуйста, с заданиями... 1. Консольный ввод/вывод целочисленного массива...

Нахождение номеров строк и столбцов и максимального элемента матрицы
задание:Дана матрица целых чисел размером MxN. Найти номера строки и столбца наибольшего...

Найти количество столбцов матрицы, не содержащих нулевого элемента
Дано целочисленную прямоугольную матрицу 1). Количество столбцов, что не содержащих нулевого...

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

	10.11.2015, 00:13

Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.

inter-admin

Эксперт

29715 / 6470 / 2152

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

Сообщений: 28,500

Блог

10.11.2015, 00:13

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

Определить количество столбцов матрицы, не содержащих ни одного нулевого элемента
Дана целочисленная прямоугольная матрица. 1)Надо определить количество столбцов, не содержащих ни...

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

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

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

Новые блоги и статьи
Rust или Go? А может C++? hw_wired 28.01.2025 С каждой новой технологией или методологией появляются новые языки программирования, призванные решать конкретные задачи либо улучшать аспекты производительности и безопасности. Среди множества. . .	Fortran и WinAPI: как создать приложение с графическим интерфейсом hw_wired 28.01.2025 Fortran — это один из старейших высокоуровневых языков программирования, широко используемый в науке и инженерии уже несколько десятилетий. Его название происходит от "Formula Translation" (перевод. . .	Списки в Haskell hw_wired 28.01.2025 Haskell является функциональным языком программирования, который отличается лаконичностью синтаксиса и мощными абстракциями. Важным концептом в Haskell являются списки — упорядоченные коллекции. . .	Функции высшего порядка в Haskell hw_wired 28.01.2025 Haskell – это современный функциональный язык программирования, который получил широкое распространение благодаря своей выразительности и мощным абстракциям. Одной из ключевых особенностей Haskell. . .	Как в цикле обойти все поля объекта в JavaScript bytestream 28.01.2025 Объекты в JavaScript представляют собой фундаментальные структуры данных, которые позволяют хранить и организовывать связанную информацию в виде пар ключ-значение. Каждый объект можно представить как. . .	Как выбрать строки в DataFrame по значению столбца в Pandas bytestream 28.01.2025 В области анализа данных библиотека Pandas стала незаменимым инструментом для работы с табличными данными в Python. Эта мощная библиотека предоставляет множество функций для эффективной обработки и. . .
Как сделать перенос строки в Bash bytestream 28.01.2025 При работе с командной оболочкой Bash разработчики часто сталкиваются с необходимостью форматирования текстового вывода, где ключевую роль играет правильное управление переносами строк. Умение. . .	Поиск подстроки в строке с помощью Bash bytestream 28.01.2025 Поиск подстроки в строке является одной из важных задач в программировании и обработке текстов. Применение такого поиска можно найти в самых разных областях, от анализа данных до разработки. . .	[golang] 169. Majority Element alhaos 28.01.2025 Тут надо вернуть "мажористый" элемент который встречается в слайсе больше чем в половине случаев. По условиям задачи во входных данных такой элемент обязан присутствовать. / / . . .	Когда лучше использовать LinkedList вместо ArrayList в Java bytestream 28.01.2025 При разработке Java-приложений выбор правильной структуры данных играет ключевую роль в обеспечении эффективности и производительности программы. ArrayList и LinkedList являются двумя. . .	Какой ответ HTTP лучше использовать: 403 Forbidden или 401 Unauthorized, когда недостаточно прав bytestream 28.01.2025 В современной веб-разработке правильная обработка ошибок и точное информирование клиентов о статусе их запросов играют критическую роль в создании надежных и безопасных приложений. Особое внимание. . .	Как получить список всех файлов коммита в Git bytestream 28.01.2025 Система контроля версий Git представляет собой мощный инструмент для управления изменениями в программном коде и других файлах проекта. В основе работы Git лежит концепция коммитов - снимков. . .

Наверх