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

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

Войти

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

Другие темы раздела
Delphi Работа с массивами в Delphi. https://www.cyberforum.ru/ delphi-beginners/ thread525667.html Помогите пожалйста решить(((( Определить количество чисел в массиве состоящий из вещественных числел, меньших среднего арифмитического значения всех чисел.	Работа со списками Delphi 3. В списке A хранится информация о людях (фамилия, имя, отчество, профессия). Имеется список В, содержащий перечень профессий. Удалить из списка А тех людей, чья профессия не указана в списке В. Помогите пожалуйста(((
Delphi Пустая переменная procedure Tu1.N1Click(Sender: TObject); var st: string; begin //AssignFile(f1,'users\'+log+'\'+log+'v1.txt'); // привязка названия к переменной {$I+} reset(f1); {$I-} read(f1,st); if st='' then https://www.cyberforum.ru/ delphi-beginners/ thread525624.html	Delphi Ошибка с программой https://www.cyberforum.ru/ delphi-beginners/ thread525605.html у меня в программе ошибка помогите найти unit Unit1; {Торговая фирма разработала несколько планов продаж письменных столов и стоек ТВ на предстоящей ярмарке с учетом изменяющейся конъюнктуры рынка и спроса покупателей. Показатели дохода представлены в таблице. Определить оптимальный план продаж. План продаж Величина дохода, тыс. руб Д1 Д2 Д3 Д4 1 850 500 200 50 2 600 900 400 550 ...
Delphi Создание редактора обьектов Не знаютуда не туда. Нужно создать редактор обьектов таков. Нажимаем на свойство выпадает окно в котором список обьектов одинаковых, при клике на одного из них мы можем редактировать их свойства в инспекторе обьектов, можем удалить, создать или переместить один из обьектов. Подобного свойства много у компонентов но как сделано смекалки не хватает что то:cry:	Delphi Формирование раундовых ключей DES https://www.cyberforum.ru/ delphi-beginners/ thread525565.html Очень срочно нужна помощь. Лабораторная работа по защите информации компьютерных систем. Есть алгоритм по формированию раундовых ключей DES, надо написать оконное приложение в делфи, в котором вводиться ключ, выводиться его двоичное представление, его вид после перестановки размером 56 бит, 16 сдвигов, и 16 подключей. Буду очень благодарна, хотя бы немного помогите!!!!
Delphi формы в delphi привет всем. есть приложение состоящие из 5-ти форм. как я понял, даже если при открытии программы отображается только одна форма, остальные все все равно загружаются, но их не видно. из за этого после открытия exe'шника требуется подождать еще 3-4 секунды, прежде чем появится первая форма. это не есть хорошо. я хотел бы сделать так, чтобы первая форма открылась сразу, а пока пользователь думал,... https://www.cyberforum.ru/ delphi-beginners/ thread525564.html	Проверить, встречается ли слово в предложении Delphi "Задано предложение, состоящее из слов-строк. Проверить, встречается ли данное слово в этом предложении." Заранее спасибо :)
Delphi Нахождение суммы значений элементов и минимального значения элементов массива всем здрасти незнаю как сделать подскажите мне плиз . Создайте консольное приложение, при выполнении которого происходит: а) ввод вещественных чисел в одномерный массив, состоящий из 10 элементов, с нижней границей индексов, значение которой равно номеру Вашего компьютера (в описании массивов должны быть использованы идентификаторы именованных констант для указания значений... https://www.cyberforum.ru/ delphi-beginners/ thread525560.html	Delphi классы в делфи https://www.cyberforum.ru/ delphi-beginners/ thread525557.html помогите пожалуйста вот задачка "Разработать класс вычисления определенного интеграла четырьмя методами (методами левых, правых, средних прямоугольников и трапеций). В классе предусмотреть методы графического отображения подинтегральной функции на расширенном интервале и геометрического смысла интеграла." как в классе сделать графическое отображение функции ?) Добавлено через 35 минут...
Ограничение edit Delphi хотелось бы ограничить ввод цифр в edit до 99 т.е ограничить сам ввод до цифр через событие у меня получилось, но как сделать что бы можно было вводить только до 99	Delphi Операции с массивом https://www.cyberforum.ru/ delphi-beginners/ thread525513.html Дан массив В(5х5) Найти среднее арифметическое элементов каждой строки, проверить равенство средних арифметических и элементов главной диагонали, при их совпадении заменить элементы главно диагонали нулями.

Psilon

Master of Orion

6098 / 4954 / 905

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

Сообщений: 14,522

Записей в блоге: 5

22.03.2012, 17:24

Оператор цикла For - Delphi - Ответ 2823692

22.03.2012, 17:24. Показов 1154. Ответов 1

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

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

Решение

Delphi

var
   n,i,fac:word;
begin
writeln('Введите число');
repeat
try
   readln(n);
except
   writeln('Неверный формат');
end;
until n>0;
fac:=1;
for i:= 1 to n do fac:=fac*i;
writeln(n,'! = ',fac);
readln;
end.

Вернуться к обсуждению:
Оператор цикла For Delphi

Заказать работу у эксперта

Programming

Эксперт

94731 / 64177 / 26122

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

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

22.03.2012, 17:24

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

Оператор цикла For
Найти следующую сумму:

Оператор цикла
Пусть x1 = 0.3, x2 = -0.3, xi = i + sin (xi-1), i = 3,4, ... Найти x1 * x2 * x3 * ... * xn. Число n...

Оператор цикла While
По формуле члена последовательности с номером k: (3(k+1))/((7k^2)+9), найти сумму первых n ...

Задачи на оператор цикла for
Задача 1. Составить программу, которая выводит все нечётные числа в интервале от 70 до 50. Задача...

	22.03.2012, 17:24

IT_Exp

Эксперт

87844 / 49110 / 22898

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

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

22.03.2012, 17:24

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

Несовместимость типов, оператор цикла
Здравствуйте! Есть задача: Дано натуральное число n. Вычислить...

Задачи на оператор цикла repeat
Задача 1. Составить программу, которая выводит все двухзначные числа кратные 8 Задача 2. Билет...

Оператор цикла с предусловием и постусловием
Вычислите разность кубов N нечётных, натуральных чисел.

Оператор цикла с предусловием и постусловием
Дано натуральное число n (n>9999) и число m. Найти сумму m- последних цифр числа n.

Составить программу используя оператор цикла с предусловием
Вычислить количество отрицательных значений sin(f) на интервале с заданным шагом.

Оператор цикла с параметром
Вот дана задача : Задана последовательность из n вещественных чисел. Определить сумму и количество...

Наверх