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

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

Войти

Регистрация
Восстановить пароль

Другие темы раздела
Delphi Изменение размера изображения https://www.cyberforum.ru/ delphi-beginners/ thread1033177.html Не получается реализовать сокращение вдвое кол-ва пикселей в изображении.Выдает ошибку : incompatible types tcolor and extended помогите пожалуйста решить проблему( var MainForm: TMainForm; x, y, p,n : integer; c,d,v,k,m:real; a,b,z,s,e:TColor; implementation	Получить последовательность по правилу Delphi Пусть дано натуральное число n и вещественные числа a1,a2,....,an которые вводятся по 1. Получите a1a2+a2a3+...+an-1*an (n>1) n,k,i :Integer; a1,a2,a3,an,ab:Extended; begin Writeln(a1,a2,a3, n); Read; if n>1 then
Delphi Delphi Word https://www.cyberforum.ru/ delphi-beginners/ thread1033097.html Помогите пожалуйста!!!!! Мне нужно через Webbrowser встроить Word документ в страницу	Delphi Преобразовать массив Преобразовать массив таким образом, чтобы сначала располагались все элементы, отличающиеся от максимального не более чем на 20%, а потом - всe остальные. https://www.cyberforum.ru/ delphi-beginners/ thread1033076.html
Delphi Пивязка кнопок ToolBar На ToolBar кидаю кнопки- его собственные либо с вкладки стандарт неважно и все они прижимаются сразу слева. 1. Вопрос- есть ли там такая настройка чтобы они прижимались к правой строне? 2. Как может быть свойство якоря там настроить чтобы потянул за правый край формы и кнопки потянулись за формой?	Delphi Timer https://www.cyberforum.ru/ delphi-beginners/ thread1033027.html Напишите программу, по поверхности окна которой перемещается случайным образом изображение веселой рожицы (компонент Image), на котором пользователь может сделать щелчок кнопкой мыши. Программа должна завершить работу после того, как пользователь сделает 10 щелчков мыши и вывести результат (сколько пользователь сделал щелчков и сколько из них попали по цели). Для организации движения...
Delphi Дополнить тест помогите дополнить тест, нужно чтобы варианты ответов менялись случайным образом Добавлено через 3 минуты помогите дополнить тест, нужно чтобы варианты ответов менялись случайным образом и как добавить на форум архив, вот сам тест unit Unit1; interface https://www.cyberforum.ru/ delphi-beginners/ thread1033026.html	Не запускается программа Delphi Всем привет, получилось найти свой курсовой в инете но не получилось запустить программу на делфи, буду очень благодарен если кто поможет с запуском , первая ошибка Error in module Unit1: Decloration of class TForm1 is missing or incorrect unit Unit1; interface uses
Delphi Компонент Shape Я нарисовала ветку в редакторе. С помощью шейпов в делфи на ветку нарисовала 9 яблок(круги). Теперь нужно создать кнопку,при нажатии на которую,все яблоки увеличивались в размере. Как это сделать? Спасибо! https://www.cyberforum.ru/ delphi-beginners/ thread1033002.html	Delphi TfileStream https://www.cyberforum.ru/ delphi-beginners/ thread1032979.html Добрый день, Нужна помощь (весь нет облазил ничего не нашел). Объясните или скиньте литературу про Tfilestream а именно про то как Записывать а потом считывать и выводить на форму Component'ы. Насколько я понимаю вроде это WriteComponent и ReadComponent, заранее спасибо!
Delphi Работа с несколькими MaskEdit в цикле На форме есть семь MaskEdit'ов, при запуске видимый только один, но пользователь может ввести количество необходимых ему, т.е. надо включить еще несколько. Вопрос: как это реализовать? Еще думала над вариантом динамического создания, но в обоих случаях на выполнении выскакивает "Access violation at address ... in module "SystEqualization.exe". Read of address ... ." и во втором "A component named...	Delphi ЦИКЛИЧЕСКИЕ АЛГОРИТМЫ Доказать (путем перебора возможных значений), что для любых величин а, b, с типа boolean следующие пары логических выражений имеют одинаковые значения (эквивалентны) A OR B и B OR A A AND B и B AND A (A OR B) OR C и A OR C (A AND B) AND C и A AND (B AND C) https://www.cyberforum.ru/ delphi-beginners/ thread1032972.html

newyork7776

351 / 344 / 279

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

Сообщений: 1,312

08.12.2013, 16:59

Циклические алгоритмы (Алгоритмы с одним циклом) - Delphi - Ответ 5456720

08.12.2013, 16:59. Показов 1679. Ответов 1

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

Сообщение было отмечено night_dragon как решение

Решение

Delphi

program Project2;
{$APPTYPE CONSOLE}
uses SysUtils;
var d:Integer;
    m:Real;
begin
  Writeln('Data [start] = 1 day[10 km]    10%');
  d:=1;
  m:=10;
  while (m<=100) do
    begin
      Inc(d);
      m:=m+(m*0.1);
    end;
  Writeln('Data [finish] = last day[',m:0:2,']  =  ',d,' day');
  readln;
end.

Вернуться к обсуждению:
Циклические алгоритмы (Алгоритмы с одним циклом) Delphi

Programming

Эксперт

94731 / 64177 / 26122

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

Сообщений: 116,782

08.12.2013, 16:59

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

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

Циклические алгоритмы
необходимо вывести на экран таблицу значений функции Y(x) и ее разложения в ряд S(x) для x...

ЦИКЛИЧЕСКИЕ АЛГОРИТМЫ
Доказать (путем перебора возможных значений), что для любых величин а, b, с типа boolean следующие...

циклические алгоритмы...
помогите плз написать проги на циклы в Delphi Console.. а то я только на линейные и разветвляющиеся...

	08.12.2013, 16:59

IT_Exp

Эксперт

87844 / 49110 / 22898

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

Сообщений: 92,604

08.12.2013, 16:59

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

Циклические алгоритмы
Определить k -- количество трёхзначных натуральных чисел, сумма цифр которых рана n (1<=n<=27)....

Циклические алгоритмы
Пожалууйстааа

Циклические алгоритмы. Табулирование функций
Циклические алгоритмы. Табулирование функций Составить алгоритм и программу вычисления значений...

Значение функции S(x) и Y(x) циклические алгоритмы
Необходимо вывести на экран таблицу значений функции Y(x) и ее разложения в ряд S(x) для x...

Наверх