|
|
| Другие темы раздела | |
|
Delphi Подскажите ошибку,не могу понять где что изменить чтобы прога работала
https://www.cyberforum.ru/ delphi-beginners/ thread867975.html Подскажите ошибку,не могу понять где что изменить чтобы прога работала. Var q,s,i: real; n,a: integer; Form1: TForm1; Implementation {$R *.dfm} Procedure TForm1.Button1Click(Sender: TObject); |
Delphi работа с одномерным массивом, компонента ТМемо Дамы натуральные числа al, а2,..., а10.Подсчитать количество чисел у которых остаток от отделения на М равен L (О <L <М-1).(надо сделать её в ДЕЛФИ 7 в оконном режиме) |
|
Delphi Выдать код символа, введенного пользователем
https://www.cyberforum.ru/ delphi-beginners/ thread867943.html Написать программу, которая выдает код символа, введенного пользователем. procedure TForm1.Button1Click(Sender: TObject); var s:char; c:integer; begin s:='';{-выдает ошибку Incompatible types: 'Char' and 'string'} c:=ord(s); edit2.Text:=floattostr(c); end; если делаю так: |
Delphi Даны целые числа al, а2,…, а10. Вывести на печать только те числа, для которых выполняется a[i] < i в оконом режиме Delphi https://www.cyberforum.ru/ delphi-beginners/ thread867934.html |
|
Установить все используемые свойства в приложении программным путем Delphi Определить что, данные числа х, у являются координатами точки, лежащей в первой координатной четверти; В оконном приложении. |
Delphi Ввести последовательность символов, заканчивающихся "*" выяснить: сколько пробелов, сколько букв А, сколько букв С, все буквы А заменить на точку
https://www.cyberforum.ru/ delphi-beginners/ thread867929.html в оконом режиме Delphi |
| Delphi Задача.Матричное множество Здравствуйте, столкнулся с проблемой которую не могу решить. Подскажите пожалуйста в чем ошибка:cry: Условие: Дана произвольная матрица М, состоящая их n-строк и k-столбцов. Образовать множество из элементов этой матрицы и найти в нем наибольший элемент. Наработка: type Tmatrica=Array of integer; TForm1 = class(TForm) Button1: TButton; Button2: TButton; Matr1: TStringGrid; https://www.cyberforum.ru/ delphi-beginners/ thread867908.html |
Delphi если элементы набора возрастают, то вывести -1;если элементы набора не возрастают и не убывают ,то вывести 0 Дано целое число K, а также К набор ненулевых целых чисел.Каждый набор содержит не менее двух элементов , признаком его завершения является число 0.Для каждого набора выполнить следующее действие: если элементы набора возрастают, то вывести -1;если элементы набора не возрастают и не убывают ,то вывести 0. |
| Delphi ошибка при компиляции Доброе утро, уверена, все банально просто, но прошу помощи. При компиляции программы,вылетает вот такая ошибка Project1.dpr(12): '.' expected but ')' found. Я понимаю, что обработчик ожидал увидеть точку, но стоит скобка program Project1; uses Forms; //Unit1 in 'Unit1.pas' {Form1}; {$R *.res} https://www.cyberforum.ru/ delphi-beginners/ thread867884.html | Delphi Error H2365: "Override method poster.execute shold match case of ancesor TThread.execute" Собственно сабж... на ембаркадеро 2010. кто может подсказать как исправить? ведет на строку обьявления главной процедуры потока protected procedure execute; override; до переоткрытия проэкта все работало норм.. https://www.cyberforum.ru/ delphi-beginners/ thread867860.html |
|
Delphi процедура рисования прямоугольника ребята помогите доделать процедуру: procedure DrawRect(x0, y0, x, y: integer; Mode: TPenMode); var pt: TPoint; rct: TRect; begin with bmp.Canvas do begin pt := PenPos; rct := Rect(x0, y0, pt.x, pt.y); DrawFocusRect ( rct ); |
Delphi Архив ZipForge. Как зашифровать файлы в архиве
https://www.cyberforum.ru/ delphi-beginners/ thread867811.html Если поставить пароль на архив ZipForge1.Password := '1234'; //ïàðîëü то имена файлов в нем будет возможно и зашифровать, а как зашифровать я так и ненагуглил. Может кто знает? |
|
Супер-модератор
  |
|
| 17.05.2013, 11:06 | 0 |
замена цикла - Delphi - Ответ 457020317.05.2013, 11:06. Показов 764. Ответов 3
Метки (Все метки)
Ответ
Изменять значение i на 1 перед началом цикла по i кто будет? (т.е., между 5 и 6 строками)
Вернуться к обсуждению: замена цикла Delphi
1
|
|
| 17.05.2013, 11:06 | |
|
Готовые ответы и решения:
3
Замена цикла в задаче Замена цикла на рекурсию Дано натуральное число n>9. Определить его вторую(с начала) цифру. С использованием А)двух инструкций цикла Б)одну инструкцию цикла Замена цикла for на do while |
| 17.05.2013, 11:06 | |
| 17.05.2013, 11:06 | |
|
Помогаю со студенческими работами здесь
0
Замена цикла на рекурсию Замена цикла рекурсией Замена переменной во время цикла Замена цикла for функциями NumPy |