Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
Другие темы раздела
Pascal ABC Pascal, задача на развилки https://www.cyberforum.ru/ pascalabc/ thread1322223.html
Кто может, решите и составьте блок схему.
Требуется определить минимальное число бусин Pascal ABC
В тарелке лежат разноцветные бусины. Все бусины имеют одинаковую форму, размер и вес. Бусины могут быть одного из N различных цветов. В тарелке очень много бусин каждого цвета. Требуется определить минимальное число бусин, которые можно не глядя взять из тарелки, так чтобы среди них гарантированно были две бусины одного цвета. Входные данные: Выходные данные: Первая строка входного файла...
Pascal ABC Создать программу в Паскале Сделать такую же программу как в этом файле, но с другими значениями. Я действительно зашёл в тупик, не знаю, что делать. Скиньте пожалуйста файлом с расширением .pas! Спасибо заранее! https://www.cyberforum.ru/ pascalabc/ thread1322184.html Pascal ABC После каждого символа "А" вставлять пробел и подсчитывать количество букв "Б" стоящих между буквами "О" и "Р" После каждого символа "А" вставлять пробел и подсчитывать количество букв "Б" стоящих между буквами "О" и "Р" https://www.cyberforum.ru/ pascalabc/ thread1322172.html
Pascal ABC Бесконечная числовая последовательность
Бесконечная числовая последовательность задана с помощью формулы ее k-го элемента: A_k = k!2^k, где k = 1, 2, 3,... Найти сумму N первых элементов этой последовательности по модулю M. Входные данные: Выходные данные: Первая строка входного потока содержит два целых числа N - количество членов последовательности (1 ≤ N ≤ 104) и M - модуль (2 ≤ M ≤ 109). В выходной...
Pascal ABC Определить, какое количество гостей именинник сможет угостить пирогом https://www.cyberforum.ru/ pascalabc/ thread1322161.html
"Как на наши именины испекли мы каравай..." прямоугольной формы со сторонам A и B. Именинник, отличающийся своими нестандартными поступками, решил угостить всех гостей этим пирогом... Но, что бы было позакрученней, он решил каждому гостю отрезать от пирога квадратный кусок, максимально возможных размеров. Понятно, что затея понравилась только первым в очереди за своим куском... Какое количество...
Pascal ABC Program5.pas(14) : Нет перегруженной подпрограммы с такими типами параметров program msy; uses crt; const n = 10; type mas = array of integer; https://www.cyberforum.ru/ pascalabc/ thread1322154.html Pascal ABC Вычислить значение выражения
Ребята, хэлп ми плиз!! От меня большой плюсище в карму тому, кто протянет руку помощи)) Нужно написать программу по этим выражениям a={y}^{x}+\sqrt{|x|+|y|};b=a+\frac{{v}^{3}}{y+{{v}^{3}}/(y+{v}^{3})^{}};x=-0.9; y=1.25; v=\frac{lga}{x*y} Откликнитесь, пожалуйста!
Pascal ABC Для каждого k от 1 до N найти такое m=m(k) https://www.cyberforum.ru/ pascalabc/ thread1322093.html
Для каждого k от 1 до N найти такое m=m(k), что 1+1/2+1/3+..+1/m>k. Тема вложенные циклы.
Pascal ABC Выведите одно число — номер любимой игры Степана Входные данные: В первой строке содержится натуральное число N (1 ≤ N ≤ 1000) - количество записей в дневнике Степана. В каждой из следующих N строк содержатся записи из дневника Степана - пара чисел Xi, Yi, которые показывают, что Степан провел за игрой Xi ровно Yi минут (1 ≤ Xi, Yi ≤ 1000). Выходные данные: Выведите одно число - номер любимой игры Степана. Ввод Вывод 3 ... https://www.cyberforum.ru/ pascalabc/ thread1322080.html
Pascal ABC Написать уравнение методом Зейделя
Всем доброго времени суток! Мне нужно решить систему лин. уравнений методом Зейделя. И всё вроде ничего, но выскакивает ошибка - индекс вне границ массива и указывает на строчку с Repeat. Помогите пожалуйста! Система: 7.8x(1)+5.3x(2)+4.8x(3)=1.8 3.3x(1)+1.1x(2)+1.8x(3)=2.3 1.8x(1)+2.3x(2)+2.8x(3)=3.4 Вот текст программы: uses crt; const a: array of real = (7.8,3.3,4.5); b: array ...
Pascal ABC Построить синтаксический анализатор Построить синтаксический анализатор для понятия константное выражение: Помогите пожалуйста)) https://www.cyberforum.ru/ pascalabc/ thread1322074.html
охотник
1011 / 535 / 650
Регистрация: 29.09.2014
Сообщений: 1,083
07.12.2014, 15:15 0

Вывести те строки матрицы, в которых есть нулевые элементы - Pascal ABC - Ответ 6953372

07.12.2014, 15:15. Показов 2037. Ответов 2
Метки (Все метки)

Ответ

подправил...
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
39
40
Program Z_2_4_6_6; {основная программа}
const N=4; M=5; {строки, столбцы}
type matr=array [1..N, 1..M] of real;
Var A:matr;
    i,j:integer;
    f:boolean;
    k:integer;
Procedure P (A:matr; i:integer; var f:boolean);
 var k,j:integer;
      g:integer;
 begin
  k:=0;
  for j:=1 to m do
   if A[i,j]=0 then k:=k+1;
   if k=0 then f:=false
          else f:=true;
 end;
begin
   k:=0;
   for i:=1 to n do
    for j:=1 to M do
     begin
      write('A[',i,',',j,']=');
      readln (A[i,j]);
     end;
    writeln; 
    for i:=1 to N do
     begin
      P (A,i,f);
      if f 
       then
        begin 
         inc(k);
         writeln('строка ',i);
         for j:=1 to n do write(a[i,j]:4);
         writeln
        end 
     end; 
    if k=0 then writeln ('Нет строк с нулями');
end.


Вернуться к обсуждению:
Вывести те строки матрицы, в которых есть нулевые элементы Pascal ABC
1
Заказать работу у эксперта
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
07.12.2014, 15:15
Готовые ответы и решения:

Для матрицы А(4 строки,4 столбца) вывести те столбцы,в которых есть нулевые элементы
Для матрицы А(4 строки,4 столбца) вывести те столбцы,в которых есть нулевые элементы ,или вывести...

Для матрицы А (4 строки, 4 столбца) вывести те столбцы, в которых есть нулевые элементы, или вывести сообщение "нет столбцов с нулями"
Задание состоит в написании программного кода Delphi. Для матрицы А (4 строки, 4 столбца)...

Вывести те столбцы матрицы, в которых есть нулевые элементы
Для матрицы А(4 строки,4 столбца) вывести те столбцы,в которых есть нулевые элементы ,или вывести...

Удалить столбцы матрицы, в которых есть нулевые элементы
Изменить матрицу – удалить столбцы матрицы, в которых есть нулевые элементы. C++ Добавлено через...

2
07.12.2014, 15:15
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
07.12.2014, 15:15
Помогаю со студенческими работами здесь

Вывести номера строк, в которых есть нулевые элементы
(Используя функции)Даны 3 двумерных массива А, В, С. В каких массивах есть хотя бы один нулевой...

Создать одномерный массив В из элементов строк матрицы A[1..N,1..M], в которых есть нулевые элементы
Создать одномерный массив В из элементов строк матрицы A, в которых есть нулевые элементы, и...

Составьте программу,выясняющую,есть ли в массиве C(N,M) строки,в которых отсутствуют нулевые элементы
Помогите,пожалуйста решить задачу по Паскалю. Составьте программу, выясняющую, есть ли в массиве...

Составьте программу, выясняющую, есть ли в массиве С(N,M) строки, в которых отсутствуют нулевые элементы.
Составьте программу, выясняющую, есть ли в массиве С(N,M) строки, в которых отсутствуют нулевые...

0
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru