Форум программистов, компьютерный форум, киберфорум
Delphi для начинающих
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
Другие темы раздела
Delphi Остановить выполнение до нажатия клавиши Доброго вечера. Как приостановить выполнение программы до нажатия на клавишу? Если более подробно: 0)Нажимаем на кнопку поехали 1)подставить значение в переменную 2)выполнить запрос 3)получить данные 4)обработать данные и отправить (отправить по нажатию на вторую кнопку)-вот тут ожидание нажатия 5)дождаться окончания отправки 6)вернуться к шагу 1 https://www.cyberforum.ru/ delphi-beginners/ thread111820.html Трехмерное представление трехмерного массива Delphi
Добрый день! Есть исходные данные: трехмерный массив из нулей и едениц. Нужно представить его графически в трехмерном виде. Где единица - там есть точка, где ноль - соответсвенно нет.
Delphi Чтение из реестра https://www.cyberforum.ru/ delphi-beginners/ thread111795.html
Здравствуйте Пытаюсь прочитать данные из реестра. Везде всё хорошо читается и только в одном месте какая то непонятка "Shell"="Explorer.exe" Вместо Explorer.exe считывается ExploreTaskM. При попытке записать в этот ключ Explorer.exe записывается Explor Здесь весь список функций для манипуляций с реестром function LastPos(Needle: Char; Haystack: string): integer;
Delphi Чтение из *.ini файла https://www.cyberforum.ru/ delphi-beginners/ thread111785.html
Всем привет прошу помочь с микро програмулькой Uses Inifiles; Var ini: TInifile; procedure TForm1.Button1Click(Sender: TObject); begin Ini:= TIniFile.Create(ExtractFilePath(Application.Exename) + '*.ini'); Ini.WriteInteger ('xxx','xxx',trackBar1.Position);
Delphi Работа со строками. Дописать программу.
Переворачиваются те и подстрока, и строка. Ищется перевернутая подстрока в перевернутой строке. И затем из этого значения нужно каким-то образом получить положение исходной подстроки в исходной строке. Как это сделать? pascal, scal -> lacsap, lacs -> k=1, из этого нужно получить 3 другой пример: prateritum, rit-> mutiretarp, tir -> k=3, получить - 6 program Project1; {$APPTYPE CONSOLE}
Delphi Ошибка Здраствуйте кто поможет найти ошибку??? сижу делаю толи шото пропустил толи Голова не варит уже(( Если кто поможет буду признателен)) unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, https://www.cyberforum.ru/ delphi-beginners/ thread111688.html
Delphi Подсчитать в мемо количество символов в заданных строках Люди подскажите как подсчитать в мемо количество символов (буквы, цифры, пробелы, точки итп) в 7 строках из 26 ? https://www.cyberforum.ru/ delphi-beginners/ thread111642.html Найти все символы,идущие после первого и до второго двоеточия. Delphi
нужно решить задачу... Найти все символы,идущие после первого и до второго двоеточия.
Delphi Определить точку, которая ближе всего расположена к началу координат https://www.cyberforum.ru/ delphi-beginners/ thread111615.html
Уважаемые форумчане помогите решить эту сложную задачу непойму как она делается:cry:. Задание: Заданы координаты 2 точек A(x1,y1) и B(x2,y2). Определить имя точки, которая ближе всего разплоожена к началу координат. Как зделать незнаю кто знает помогите.
Delphi игра "день недели" помогите написать код программы: "День недели". Составить программу нахождения по дате рождения дня недели, знака зодиака. https://www.cyberforum.ru/ delphi-beginners/ thread111610.html
Delphi Литература по программированию в среде Delphi
Нужно 12 авторов вот в тако формате, пример: Бондарев В.М., Рублинецкий В.И., Качко Е.Г. Основы программирования. —Харьков: Фолио, Ростов н/Д: Феникс, 1997. Автор Название учебника. - Город: Издательство: Год.
Delphi Необходимо определить, есть ли человек, побывавший у всех в гостях. https://www.cyberforum.ru/ delphi-beginners/ thread111473.html
Тема курсавой:Реализовать программу с графическим интерфейсом, которая реализует ввод списка группы, а для каждого из введенных ввод одногруппников, побывавших у него в гостях. Необходимо определить, есть ли человек, побывавший у всех в гостях.
0 / 0 / 0
Регистрация: 22.03.2010
Сообщений: 17
0

Перестановка елементов масива - Delphi - Ответ 636263

01.04.2010, 23:50. Показов 563. Ответов 2
Метки (Все метки)

Author24 — интернет-сервис помощи студентам
Здраствуйте.....случилась такая ситуацыя что я не понимаю как зделать это на Delphi....
у меня есть примерно на паскале зделал....но как в Delphi перевести чтото неполучается
Вот условие....
Заданы действительные числа y1, y2, ..., y20 . Получить y1, y11, y3, y13, . . ., y9, y19 .
Заранее благодарен.

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
uses crt;
var y:array[1..20] of real;
i:byte; p:real;
begin
clrscr;
randomize;
for i:=1 to 20 do y[i]:=random;
writeln('Pochatkovuy Mas:');
for i:=1 to 20 do write(i,')',y[i]:5:2,'':2);
writeln; writeln;
i:=2;
repeat
y[i]:=y[9+i];
i:=i+2;
until i>10;
writeln('Novui Mas:');
for i:=1 to 10 do write(i,')',y[i]:6:2,'':2);
readkey;
end.


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

Дано масив чисел. Найти количество элементов масива, которые расположены между max и min элементами масива
Помогите, пожалуйста, вычислить количество элементов между максимальным и минимальным элементами....

Перестановка елементов масива
Уважаемые форумчане помогите решить эту сложную задачу: Действительные векторы заданы...

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

Вывод елементов масива
Этот фрагмент кода выводит массив весь А, а должен выводить элементы в массиве А, которые не входят...

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

Найти количество положительных елементов масива А={a[i]}0<i<=33
Помогите пожалуйста решить: Найти количество положительных елементов масива А={a}0&lt;i&lt;=33, что...

найти произведение положительных елементов масива
найти произведение положительных елементов масива v(15) и количество всех отрицательных елементов...

Програма вычесления нулевых елементов масива
model small .stack 100h .data k db ? len equ 5 mas db 5,0,8,0,8 .code

Определить сумму елементов масива от ymax
Дан массив y1,....,y20 Определить сумму элементов массива от ymax до y20

определить сумму елементов масива целых чисел
кто может,помогите пожалуйста))) написать программу : обработка однородных масивов определить...

Сума елементов масива порядковый номер которых простое число
Задача: Дано последовательность не менее чем двох натуральных чисел, после которых следует ноль....

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