Delphi для начинающих

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

Войти

Другие темы раздела
Delphi Вставить строку в текстовый файл после строки с заданным номером пусть дан текстовый файл. вставить строку после строки с заданным номером. если строки с указанным номером нет, сообщите об этом С коленки: With TStringList.Create do begin LoadFromFile('Файл'); if (n>=0) and (n<Count) Insert(n,'Вставим') else ShowMessage('Неа'); SaveToFile('Файл'); Free; end; https://www.cyberforum.ru/ delphi-beginners/ thread1684873.html	Delphi Ошибка Авторизации на сайте - Delphi Привет всем! помогите решить проблему , что это за ошибка? Скриншот: Вы умеете делать парсер ? Его умеют делать все кому тока не лень.. https://www.cyberforum.ru/ delphi-beginners/ thread1684761.html
Delphi Активация checkbox при выполнении условия Есть 2 checkbox'а на 1 форме. На 2 форме выполняется условие при котором k принимает 2 значения. Если к примет 1 значения то появляется галка на 1 чекбоксе, если другое значение то активируется 2... Form1.CheckBox1.Checked := k=1; Form1.CheckBox2.Checked := k<>1; но вообще в таких случаях используют RadioButton https://www.cyberforum.ru/ delphi-beginners/ thread1684879.html	Delphi Сумма и произведение элементов обеих диагоналей матрицы https://www.cyberforum.ru/ delphi-beginners/ thread1684914.html Помогите, братцы. Найти сумму и произведение элементов главной и побочной диагонали . Все верно, проверил на меньших числах. Приведите пример где Вам кажется неверно.
Delphi Микрофон в Chromium Всем привет, пытаюсь настроить google speech через chromium все вроде загружается, потом вежливо просят нажмите allow что заработал микрофон, а в chromium к сожалению некуда нажать...как можно...	Delphi Написать программу, определяющую, поступил абитуриент в институт или нет https://www.cyberforum.ru/ delphi-beginners/ thread1684824.html Вводятся баллы абитуриенту по четырем экзаменам, за каждый из которых он может получить максимально 25 баллов. Проходной балл равен 80. Если абитуриент за какой-либо экзамен получил менее 10 баллов,... ну и в чем проблема? массив пройтись по нему в цикле, проверить меньше ли 10 найти сумму если меньше 80 - сообщение что у вас не получается?
Delphi Что с делфи Создал пустой проект на delphi xe10 . Вообще пустой, нет ни кнопок ни чего , откомпилил и вот что показывает сайт... Вы же видите что ни один нормальный вирус не видит ничего плохого. Поэтому или смените антивирус или отключайте на время работы с Делфи.	Распечатайте буквы, которые встречаются в каждом слове заданного текста только один раз Delphi пусть дан текст.распечатайте те буквы которые встречаются в каждом слове текста только один раз По идее нужен длинный и долгий код, хотя может быть и не на столько длинный, нужен массив для подсчета это раз, и цепляться за пробелы это два. И все и код пиши. Могу конечно написать код который...
Удалить последнюю строку из переменной widestring Delphi Помогите. Уже не знаю. Перепробовал все. Не охото использовать TStringList ради того чтобы удалить последнюю строку. И так. в WideString все как в одной строке. Это верно так что ориентироваться... как удалить самый последний #13#10 В цикле от конца к началу строки бежать и сравнивать i-й символ на равенство #13 и i+1-й символ на равенство #10 Как только пара найдена, влупить на место i-го...	Delphi Повернуть фигуры на 30 градусов https://www.cyberforum.ru/ delphi-beginners/ thread1684780.html Всем доброго времени суток, помогите пожалуйста разобраться. Как повернуть треугольник, квадрат на 30 градусов. Вот сам код: unit Unit1; interface uses Windows, Messages, SysUtils,... Как повернуть треугольник, квадрат на 30 градусов Вокруг чего повернуть?
Delphi Парсинг HTML средствами Delphi (выбрать <div class="si_title">) https://www.cyberforum.ru/ delphi-beginners/ thread1684912.html Доброго времени форумчане. Подскажите в каком направлении идти. Пишу программу которая собирает информацию о товаре. В общем особо с парсингом не все так сложно НО не могу все равно вытащить нужную... Я ввожу артикул товара. Выполняю get и получаю страницу. Из нее пытаюсь вытащить все что есть в <div class="si_title"></div> но что то не получается.	Delphi Линейный список: удалить фамилии, начинающиеся на букву "А" https://www.cyberforum.ru/ delphi-beginners/ thread1684887.html На данный момент программа удаляет введенную фамилию. Не могу понять как переделать процедуру del чтобы она удаляла только фамилии начинающиеся на букву А. unit Unit1; interface uses Windows,...

ROS88

138 / 136 / 100

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

Сообщений: 553

14.03.2016, 20:00

Определить числа b1,…,bm, равные соответственно наименьшим значениям элементов строк матрицы - Delphi - Ответ 8881543

14.03.2016, 20:00. Показов 1905. Ответов 3

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

Ответ

Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
     randomize;
     for i := 1 to 4 do
       for j := 1 to 4 do
         begin
           A[i, j] := RandomRange(-100, 100);
           StringGrid1.Cells[j-1, i-1] := IntToStr(A[i, j]);
         end;
     for i := 1 to 4 do
       begin
         MIN[i] := A[i, 1];
         for j := 2 to 4 do
           if (MIN[i] <= A[i, j]) then
             MIN[i] := A[i, j];
       end;

Вернуться к обсуждению:
Определить числа b1,…,bm, равные соответственно наименьшим значениям элементов строк матрицы Delphi

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

Programming

Эксперт

39485 / 9562 / 3019

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

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

Блог

14.03.2016, 20:00

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

Определить числа матрицы, равные соответственно наименьшим значениям элементов строк
дана действительная матрица размера m x n. Определить числа {b}_{1},...{b}_{m}, равные соответственно наименьшим значениям элементов строк ...

Надо найти числа B1,B2..Bn, равные наименьшим значениям строк матрицы
Помогите, пожалуйста. Двумерный целочисленный массив A(m,n) задается с экрана, либо генерируется от -100 до 100. Надо найти числа...

Определить числа b1,...bm равные значениям средних арифметических элементов строк
пожалуйста помогите решить задачи в делфи. 1. Дана действительная матрица размера m х n. Определить числа b1,...bm равные значениям...

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

inter-admin

Эксперт

29715 / 6470 / 2152

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

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

Блог

14.03.2016, 20:00

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

Определить числа, равные соответственно разностям наибольших и наименьших значений элементов строк
Дана действительная матрица размера n на m. Определить числа b1...bm, равные соответственно: разностям наибольших и наименьших значений...

Массив: Определить числа b0, b1, bn равные соответственно наименьшим значениям элементов строк
Дана действительная матрица размером n*m.Определить числа b0,b1...bn равные соответственно наименьшим значениям элементов строк.

Массив: Определить числа b1, b2, , bn, равные соответственно наименьшим значениям элементов строк
Дана действительная матрица размера n×m. Определить числа b1, b2, ..., bn, равные соответственно наименьшим значениям элементов строк.

Определить числа, равные наименьшим значениям элементов строк матрицы
1. Дана действительная матрица размера m*n. Определить числа b1, b2,… bm равные соответственно наименьшим значениям элементов строк.

Определить числа равные наименьшим значениям элементов строк матрицы
Дана действительная матрица размера m*n. Определить числа b1,…,bm равные наименьшим значениям элементов строк. Буду очень признателен...

Новые блоги и статьи Все статьи Все блоги /
Что нового в C# 14 UnmanagedCoder 10.03.2025 Предстоящая версия C# 14 обещает принести изменения, которые сделают разработку еще более приятной и эффективной. Что стоит отметить, так это влияние сообщества разработчиков на формирование новых. . .	Формулы поворота Igor3D 10.03.2025 Добрый день Тема Эти формулы приводятся во множестве тьюториалов, часто под видом "матрица вращения на плоскости". x' = x * cos(a) - y * sin(a) y' = y * cos(a) + x * sin(a) Как бы Вы их. . .	Что нового в .NET 10 UnmanagedCoder 10.03.2025 . NET 10 выходит как релиз с длительной поддержкой (LTS), включающей три года обновлений. В этом обновлении Microsoft сфокусировались на нескольких направлениях: производительность, оптимизация. . .	Отложенное высвобождение, RCU и Hazard Pointer в C++26 NullReferenced 09.03.2025 Многопоточное программирование стало важной частью современной разработки. Когда несколько потоков одновременно работают с общими данными, возникает целый ряд проблем, связанных с синхронизацией и. . .	Неблокирующийся стек на C++26 NullReferenced 09.03.2025 Традиционные способы синхронизации в многопоточном программировании — мьютексы, семафоры, условные переменные — часто превращаются в узкое место в плане производительности. При этом неблокирующиеся. . .
Обработка строк в C++26: Новые возможности string и string_view NullReferenced 09.03.2025 Новый стандарт C++26 предлагает много улучшений для работы с привычными string и относительно новыми string_view. string_view - это невладеющая ссылка на последовательность символов, появившаяся в. . .	Мой первый аддон для Blender 3D, с помощью нейронки (не зная даже азов пайтона, но это не значит что так и с остальным). Hrethgir 09.03.2025 Потратил весь день. Пол-дня мне хватило, чтобы понять что с версией с 14B мне не одолеть написание функционального кода, на языке с которым я вообще никак не знаком - пайтон. Версия 22B от другого. . .	Einstein@Home сегодня исполняется двадцать лет! Programma_Boinc 09.03.2025 Einstein@Home сегодня исполняется двадцать лет! Отправлено 19 февраля 2025 года в 17:20:21 UTC Я хочу поздравить всех наших волонтеров, разработчиков и ученых из Einstein@Home. Мы официально. . .	Заполнители и расширенный набор символов в C++26 NullReferenced 09.03.2025 C++26 представляет два важных обновления: заполнители и расширенный набор символов. Заполнители (placeholders) решают давнюю проблему лаконичности кода в шаблонных выражениях и лямбда-функциях. Они. . .	Контракты в C++26 NullReferenced 09.03.2025 Контракты – это механизм, позволяющий указывать предусловия, постусловия и инварианты для функций в коде. Эта функциональность должна была стать частью C++20, но была исключена на встрече комитета. . .

Наверх