Форум программистов, компьютерный форум, киберфорум
Delphi для начинающих
Войти
Регистрация
Восстановить пароль
Другие темы раздела
Delphi too many actual parameters Я ввожу s:string; Memo1.Lines.Add('123',s,'123'); и выдаёт ошибку too many actual parameters как нужно исправить код чтобы не выдавало ошибку ??? https://www.cyberforum.ru/ delphi-beginners/ thread163300.html Delphi String
Подскажите как чтобы текст переменной x:string; был равен '
Delphi Решение систем линейных уравнений https://www.cyberforum.ru/ delphi-beginners/ thread163229.html
Программа 1Создание приложения по разделу линейной алгебры «Решение систем линейных уравнений». Приложение должно содержать: 1)подпрограммы, реализующие: а) Метод Гаусса (коэффициенты системы и число n – задаются пользователем); б) метод Крамера; 2) вычисление определителя матрицы системы. Программа 2Создать приложение по разделу аналитической геометрии «Треугольник». Приложение должно...
Delphi Вывод jpg в Image Где ошибка в коде: procedure TForm1.Button2Click(Sender: TObject); begin S:=IdHTTP1.Get('http://love.fowap.ru/reg.php'); FS:=TFileStream.Create('captcha.jpg',FMCreate); IdHTTP1.Get('http://love.fowap.ru/icode.php?5075&icq2=c7532894a84ff213d7625ed7110a49e1.jpg', FS); FS.Free; Image2.Picture.LoadFromFile('captcha.jpg'); end; ??? https://www.cyberforum.ru/ delphi-beginners/ thread163198.html
Delphi Edit
Подскажите что использавать если при нажатии на button1 в, edit или чтото похожее, добавлялась строка по названием but1 а при нажатии на кнопку button2 в, edit или чтото похожее, добавлялась строка по названием but2. Подскажите что использовать вместо edit
Delphi Приложение https://www.cyberforum.ru/ delphi-beginners/ thread163169.html
Народ тут дали задание, не знаю даже как правильно его описать. У нас есть поле состоящее из клеток nxn.Все кнопки(ячейки) белого цвета. при нажатии на кнопку, она остается того же цвета, а все остальные кнопки по вертикали и горизонтали относительно ее, меняют свой цвет на противоположный(по началу на черный). дальше жмем на др кнопку, и происходит тоже самое, инверсия цвета уже по гориз и...
Delphi Иконки на кнопках Приветствую. Есть большая коллекция иконок в формате ico скажите, как их можно в программе использовать как иконки на различных кнопках, ато там только bmp подходит Спасибо. https://www.cyberforum.ru/ delphi-beginners/ thread163148.html Savedialog в delphi 7 Delphi
Подскажите как чтобы при нажатии на кнопку сохранялся paintbox1 в C:\123.jpg
Delphi Ввод русских букв https://www.cyberforum.ru/ delphi-beginners/ thread163121.html
Доброго времени суток. Я пишу программу, где нужно вводить Имена русскими буквами. Но Когда я щелкаю в руской раскладке то меня на экране отображается некая "абракадабра". SetConsoleCP(1251); SetConsoleOutputCP(1251); - Что бы переключать потом язык в консоли - не катит. Это не есть верно... Мне нужно что бы как в функции вывода было - без всяких смен языка в настройках консоли.....
Delphi Floodfill Подскажите что делать. Я ввожу paintBox1.Canvas.FloodFill(_x,_y,colordialog1.Color); и выдаёт ошибку "Not enough actual parameters" https://www.cyberforum.ru/ delphi-beginners/ thread163104.html
Delphi colordialog1 в Delphi 7
Подскажите как что бы при нажатии на image1 появлялось colordialog1
Delphi Updown дробный шаг Updown - свойство Associate=edit 1. Как сделать чтобы свойство increment делал шаг в 0.1??? я делаю но выдает ошибку is not a valid integer value. https://www.cyberforum.ru/ delphi-beginners/ thread163088.html
420 / 417 / 79
Регистрация: 21.06.2010
Сообщений: 1,362
03.09.2010, 17:03 0

Процедура заполняющая прямоугольню матрицу заданного размера случайными числами от 0 до1 - Delphi - Ответ 938619

03.09.2010, 17:03. Показов 1314. Ответов 9
Метки (Все метки)

Ответ

тогда зачем вообще вводить матрицу, ты ж её не используешь вообще... сразу пиши строки напрямую в memo...

Добавлено через 4 минуты
вот так это будет выглядить исходя из ваших требований
Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
procedure TForm1.Button1Click(Sender: TObject);
var m, n, i, j: byte; // я думаю размер матрицы не будет больше 254х254
    s: String;
begin
  n:=StrToInt(Edit1.text);
  m:=StrToInt(edit2.tex);
  Memo1.Lines.Clear;
  for i:=1 to m do
  begin
    s:='';
    for j:=1 to n do
      s:=s+'<разделитель>'+FloatToStr(Random);
    Meno1.Lines.Add(s);
  end;
end;


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

Функция заполняющая матрицу случайными числами
Дорогие форумчане,помогите пожалуйста приделать функцию рандомного ввода чисел, ручной ввод есть, а...

Функция заполняющая массив случайными числами
Задача 6. Создайте функцию, заполняющую массив случайными числами. Массив для заполнения...

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

Получить матрицу размера n*m, заполненную случайными действительными числами от 0 до 25
Получить матрицу размера n*m, заполненную случайными действительными числами от 0 до 25. Указать...

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

Заполнить матрицу четными случайными числами из заданного интервала
1)Заполнить двумерный массив 3х4 четными случайными числами из интервала .Вывести массив на экран в...

Заполнить матрицу размера М*N случайными числами. Вычислить сумму минимального и максимального элементов матрицы.
Помогите пожалуйста

Заполнить матрицу заданного размера M(k,l) числами 1,2,3,4
Заполнить матрицу заданного размера M(k,l) числами 1,2,3,4 так, чтобы по горизонтали, вертикали и...

Заполните квадратную матрицу заданного размера числами из данного файла
Пусть дан файл целых чисел. Заполните квадратную матрицу заданного размера числами из этого файла....

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