Форум программистов, компьютерный форум, киберфорум
Delphi для начинающих
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.64/14: Рейтинг темы: голосов - 14, средняя оценка - 4.64
1 / 1 / 0
Регистрация: 19.01.2011
Сообщений: 31
1

циклические алгоритмы...

21.01.2011, 18:35. Показов 2612. Ответов 1
Метки нет (Все метки)

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

1. Найти сумму чисел от 100 до 200, кратных 17.

2. С помощью оператора while напишите программу вывода всех четных чисел в диапазоне от 2 до 100 включительно.

3. Составьте программу определения наименьшего общего кратного двух натуральных чисел (использовать формулу: НОК*НОД=a*b)..

P.S.
каждую задачу нужно решить с помощью разных циклов! (например: первую с помощью цикла FOR, вторую с WHILE, и т.д....)))
спасибо за понимание))
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
21.01.2011, 18:35
Ответы с готовыми решениями:

Циклические алгоритмы (Алгоритмы с одним циклом)
Доброго времени суток! Помогите пожалуйста написать программы на циклы в Delphi 7, а то я только...

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

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

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

1
Фрилансер
Эксперт С++
5843 / 1224 / 499
Регистрация: 23.11.2010
Сообщений: 3,377
Записей в блоге: 1
21.01.2011, 20:09 2
Лучший ответ Сообщение было отмечено jack the ripper как решение

Решение

Pascal
1
2
3
4
for i:=100 to 200 do
if i mod 17=0 then
inc(sum,i);
writeln(sum);
Добавлено через 3 минуты
Delphi
1
2
3
4
5
6
7
8
9
10
11
12
procedure TForm1.Button1Click(Sender: TObject);
var
i :integer;
begin
i:=2;
while i<=100 do
begin
if not odd(i) then
Memo1.Lines.Add(intTostr(i));
inc(i);
end;
end;
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
21.01.2011, 20:09

Заказываю контрольные, курсовые, дипломные работы и диссертации здесь.

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

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

Задача по теме «циклические алгоритмы»
Суточный рацион коровы составляет u кг сена, v кг силоса и w кг комбикорма. В хозяйстве, содержащем...

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

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

Циклические структуры
Заранее спасибо


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.