Pascal (Паскаль)

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

Войти

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

Другие темы раздела
Pascal Определить выигрышную стратегию при игре в камушки https://www.cyberforum.ru/ pascal/ thread2721639.html ЕГЭ. Два игрока, Петя и Ваня, играют в следующую игру. Перед игроками лежат две кучи камней. Игроки ходят по очереди, первый ход делает Петя. За один ход игрок может добавить камней в одну из куч (по своему выбору) 1 или увеличить количество камней в куче в 2 раза. Например, пусть камней в одной куче 10, а в другой 5; такую позицию в игре будем обозначать (10, 5). Тогда за один ход можно...	Pascal Расположить элементы, целая часть которых находится в заданном диапазоне, в начале массива Преобразовать массив таким образом, чтобы сначала располагались все элементы, целая часть которых лежит внутри отрезка , а потом остальные. Упорядочить все элементы массива методом пузырька.
Pascal Найти первое число Фибоначчи, большее заданного натурального числа Найти первое число Фибоначчи, больше N, где N - заданное натуральное число, большее 1. И создать блок схему. https://www.cyberforum.ru/ pascal/ thread2720954.html	Pascal Чему равно x при a=true и b=false? https://www.cyberforum.ru/ pascal/ thread2720581.html if a then if b then x:=1 else x:=2 x:=3 Чему равно x при a=true и b=false?
найти среди сотрудников предприятия количество мужчин призывного возраста и вывести информацию о них Pascal найти среди сотрудников предприятия количество мужчин призывного возраста и вывести на экран их фамилии, имена и должности паскаль используя type Добавлено через 12 минут type stud=record name:string; surname:string; position:string; age:integer; end; var A:array of stud;	Pascal Вычислить сумму ряда Задали паскаль а я совсем не разбираюсь :(((( Составить программу для вычисления суммы \sum_{i=1}^{n}\left(\cos i+\ln \|2i\| \right) https://www.cyberforum.ru/ pascal/ thread2720256.html
Pascal Написать програму с использованием записей https://www.cyberforum.ru/ pascal/ thread2720033.html В один каталог занесены и газеты, и журналы. Поля записи: название издание, газета или журнал, дата издания. Разделить этот каталог на два отдельных для газет и для журналов.	Pascal Подсчет количества чисел и наименьшего из них Что с кодом не так? Определить количество принадлежащих отрезку 10; 4∙1010] натуральных чисел, которые делятся на 7 и на 100000 и при этом не делятся на 13, 29, 43 и 101, а также наименьшее из таких чисел. В ответе запишите два числа: сначала количество, затем наименьшее число. var count, min: int64; begin min := 40000000001;
Pascal Задача про Карлсона https://www.cyberforum.ru/ pascal/ thread2719611.html Малыш, его друг Карлсон, который живет на крыше и мадмуазель Фрекен Бок вместе за один месяц могут съесть от 65 до 80 пачек печенья. Если Карлсон отправится в далекое путешествие и Малышу самому придется есть печенье, то ему будет необходимо в 6 раз меньше. А если есть будет одна лишь мадмуазель Фрекен Бок, то ей будет нужно на 4 пачки больше чем Малышу. Составьте программу, которая по выбору: ...	Pascal Нужно решение. Буду очень благодарен https://www.cyberforum.ru/ pascal/ thread2719519.html Напишите пожалуйста код.
Pascal Даны два целых числа A и B (A < B). Найти сумму синусов всех целых чисел от A до B включительно НЕОБХОДИМО Найти сумму синусов всех целых чисел от A до B включительно .(Даны два целых числа A и B (A < B). ) Я вообще не разбираюсь в этих ваших интернетах,паскалях и т.д. Поэтому прошу помощи. С помощью гугла и cyberforuma собрал вот такое чудо: _______________________________ var i,a,b: integer; begin write('Введите число a= ');read(a); write('Введите число b= ');read(b); for i:=a to...	Pascal Ошибка "Неправильный тип параметров подпрограммы" Паскаль Задание: В текстовом файле поменять местами слова "in" и "on". Выдает ошибку "Неправильный тип параметров подпрограммы" Вот моя программа: program lab9 (input, output); const sl1='in'; sl2='on'; var f: text; https://www.cyberforum.ru/ pascal/ thread2719174.html

Cyborg Drone

Модератор

10012 / 5367 / 3340

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

Сообщений: 16,352

02.11.2020, 07:39

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

02.11.2020, 07:39. Показов 1502. Ответов 7

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

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

Решение

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

Pascal

const
  m = 4;
  n = 6;
var
  a: array[1..m, 1..n] of integer;
  i, j, k: integer;
begin
  randomize;
  writeln('Исходная матрица:');
  for i := 1 to m do
    begin
      for j := 1 to n do
        begin
          a[i, j] := -99 + random(199);
          write(a[i, j]:4)
        end;
      writeln
    end;
  writeln('Номера отрицательных элементов столбцов:');
  for j := 1 to n do
    begin
      write('Столбец ', j, ':');
      k := 0;
      for i := 1 to n do
        if a[i, j] < 0 then
          begin
            write(i:2);
            k := k + 1
          end;
      if k = 0 then write(' Нет отрицательных элементов');
      writeln
    end;
  readln
end.

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

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

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

Programming

Эксперт

94731 / 64177 / 26122

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

Сообщений: 116,782

02.11.2020, 07:39

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

Для каждой строки заданной матрицы найти и напечатать номера столбцов, содержащих отрицательные элементы
Помогите написать программу(С++) для этой задачи, буду очень благодарен за любую помощь. Задача:...

Для каждой строки заданной матрицы А{5,4) найти и напечатать номера столбцов, содержащих ненулевые элементы
Помогите пожалуйста, не могу сделать! Составить программу в системе Mathcad для заданной ...

Для каждой строки заданной матрицы А найти и напечатать номера столбцов, содержащих НЕнулевые элементы, m=5, n=4.
Необходимо решить следующую задачу: Для каждой строки заданной матрицы А найти и напечатать номера...

Для каждой строки заданной матрицы найти номера столбцов, содержащих ненулевые элементы
Здравствуйте, помогите пожалуйста! Для каждой строки заданной матрицы A (n, m) найти номера...

	02.11.2020, 07:39

IT_Exp

Эксперт

87844 / 49110 / 22898

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

Сообщений: 92,604

02.11.2020, 07:39

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

Для каждого столбца заданной матрицы Т(5,3) найти и напечатать элемент, значение которого максимально
Составить программу в системе Mathcad для заданной матрицы. Для каждого столбца заданной матрицы...

Как Найти номера строк, содержащих отрицательные элементы в прямоугольной матрице
не могу сообразить как это сделать вот мой код #include <stdio.h> #include <stdlib.h> #include...

Найти наибольшие, отрицательные, элементы каждого столбца матрицы
Найти наибольшие, отрицательные, элементы каждого столбца матрицы Е(m,n) и переписать их в...

В матрице найти номера строк, содержащих только нулевые элементы, и номера строк, содержащих только чётные элементы,
Задана целочисленная матрица А размерности N x N. Найти номера строк, которые имеют: а) все...

Найти наибольшие отрицательные элементы каждого столбца матрицы под главной диагональю
Найти наибольшие отрицательные элементы каждого столбца матрицы GE (n,n) под главной диагональю и...

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

Наверх