Форум программистов, компьютерный форум, киберфорум
Delphi для начинающих
Войти
Регистрация
Восстановить пароль
Другие темы раздела
Delphi Дана прямоугольная таблица которая содержит не более 10 строк и не более 10 столбцов. Вывести только те элемен https://www.cyberforum.ru/ delphi-beginners/ thread1417291.html
Дана прямоугольная таблица которая содержит не более 10 строк и не более 10 столбцов. Вывести только те элементы, которые меньше элемента, стоящего на главной диагонали в данной строке.
Delphi Как перенести консольную программу на форму?
Вот у меня есть программа одна, где все расчитывается в консоли.. А ее надо визуализировать... И вот как мне перенести ее на форму, чтобы вводить и выводить данные надо было на "edit","memo" , ну а все решалось нажатием на "Button" и т.д... Саму форму я могу сделать, но вот как связать все эти компоненты с кодом консольной программы...
Delphi Дана строка, состоящая из групп нулей и единиц. Подсчитать количество символов в самой длинной группе Дана строка, состоящая из групп нулей и единиц. Подсчитать количество символов в самой длинной группе. https://www.cyberforum.ru/ delphi-beginners/ thread1417276.html Delphi Скрыть Usb устройства Здравствуйте, появилась задачка отслеживать всё что копируется с флешки, решил пойти путем наименьшего сопротивления, и проводить все операции копирования через свою программу, а что-бы у людей не было желания сделать это через другие программы типа far-a и total commander-a я при подключении usb методом DeleteVolumeMountPoint убираю букву диска,предварительно сохранив guid флешки, и когда надо... https://www.cyberforum.ru/ delphi-beginners/ thread1417274.html
Stringreplace Delphi
Добрый вечер, помогите, что я делаю не так : var total:string; begin total:=' lolka '; srichedit1.Text := StringReplace(total, ' ', '',); в ричедит все равно присутствуют пробелы... не пойму.... что не так ?
Delphi Команда обобщения строк кода https://www.cyberforum.ru/ delphi-beginners/ thread1417249.html
Напомните, никак не нагуглю. Не получается понятно сформулировать гуглу вопрос. Забыл команду которая обобщает строку кода и её дальше можно не писать. Например, для доступа к свойствам одного объекта. Из головы вылетело, никогда её не использовал. Команда Button1 begin .Heit := .With:= .Caption:= end Ну думаю вы меня поняли ? Что за команда-то ?
Delphi Переставляя строки и столбцы матрицы, добиться того, чтобы наибольший элемент оказался в верхнем левом углу https://www.cyberforum.ru/ delphi-beginners/ thread1417185.html
Дана матрица размером nxm. Переставляя ее строки и столбцы, добиться того,что бы наибольший элемент(или один из них)оказался в верхнем левом углу
Delphi Задача по выводу на экран 1 или 0
Вывести на экран 1 или 0 в зависимости от того, равна ли сумма двух первых цифр заданного четырёхзначного числа сумме двух его последних цифр. Помогите пожалуйста :-[
Delphi Отсортировать данные в StringGrid https://www.cyberforum.ru/ delphi-beginners/ thread1417073.html
Народ!!! Дан stringgrid и дана кнопка StringGrid1.Cells:='Фамилия'; StringGrid1.Cells:='Имя'; StringGrid1.Cells:='Адрес'; StringGrid1.Cells:='Телефон'; Надо его отсортировать по Фамилии. Надо сделать это через массив , не могу справиться ( Причем что бы Имена , Адреса и номера не путались а оставались на той же линии что и Фамилия
Delphi Дистрибутив RAD 2010 Professional https://www.cyberforum.ru/ delphi-beginners/ thread1417065.html
Добрый день Дайте дистрибутив RAD 2010 Professional или Enterprise (луче оба) Спасибо
Условные операторы в делфи Delphi
Нужна помощь в написании программы. 1. Дана точка А с координатами x и y. Определить ее положение относительно квадрата, стороны которого равны 1, центр в начале координат, стороны параллельны осям. вот эту программу нужно написать. Вот такой код для кнопки начал писать: procedure TForm1.Button1Click(Sender: TObject); var x,y:integer; begin
Delphi Работа с timage.canvas, отрисовка нескольких картинок Задача такая, есть белый фон, нужно отрисовать несколько картинок (всего 3), картинки примерно 10*10 пикселов, они будут заполнять канву через цикл, картинки не накладываются друг на друга поэтому пофиг на формат, лиж бы отрисовка была быстрой. Как посоветуете сделать ? есть примеры? https://www.cyberforum.ru/ delphi-beginners/ thread1417026.html
226 / 225 / 112
Регистрация: 20.10.2013
Сообщений: 808
09.04.2015, 20:36 0

Найти и вывести номера только тех строк матрицы, все элементы которых четные - Delphi - Ответ 7459585

09.04.2015, 20:36. Показов 1855. Ответов 2
Метки (Все метки)

Лучший ответ Сообщение было отмечено Абдурахман как решение

Решение

Абдурахман, алгоритм следующий:
Delphi
1
2
3
4
5
6
7
8
9
10
11
12
    for i := 0 to N - 1 do
    begin
      Flag := True;
      for j := 0 to M - 1 do
        if Odd(a[i, j]) then
        begin
          Flag := False;
          Break;
        end;
      if Flag then
        WriteLn(i);
    end;


Вернуться к обсуждению:
Найти и вывести номера только тех строк матрицы, все элементы которых четные Delphi
0
Заказать работу у эксперта
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
09.04.2015, 20:36
Готовые ответы и решения:

Найти номера строк матрицы, все элементы которых – нули
. Дана целочисленная квадратная матрица порядка n. Найти номера строк: все элементы которых –...

Найти номера строк матрицы элементы которых образуют симметричные последовательности.
Дана целочисленная квадратная матрица порядка m. Найдите номера строк элементы, которых образуют...

В матрице найти номера строк, все элементы которых по модулю меньше первого
Задание 9. Дана целочисленная квадратная матрица порядка n. Найти номера строк: .Все элементы...

Дана целочисленная квадратная матрица порядка m. Найти номера строк, все элементы которых четны
ребят, тупик. помогите Дана целочисленная квадратная матрица порядка m. Найти номера строк, все...

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

Найти количество строк матрицы, все элементы которых различны
Дана целочисленная матрица размера M x N. Найти количество ее строк, все элементы которых различны....

Найти количество строк матрицы, все элементы которых положительные
В матрице 6х3 найти кол-во строк все элементы которых положительны.

Сохранить в массив номера тех столбцов матрицы, в которых есть равные элементы
Дан прямоугольный массив A. Получить линейный массив B, в котором будут храниться номера тех...

Найти количество строк и столбцов матрицы, все элементы которых различны
Дана целочисленная матрица размера M x N. Найти количество ее строк1|столбцов2, все элементы...

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