[Konstie]

Передо мной стоит следующая задача:
Написать программу, которая будет выводить все числа, кратные 3 на промежутке от a до b (а не из конкретных чисел, решение чего всего можно чаще всего встретить на просторах инета. При этом все числа будут выводиться в Memo, а визуально сама программа должна выглядеть примерно так:

Также необходимо использовать оператор цикла for. Собственно, как можно запрограммировать пункт меню "Найти все числа кратные 3", чтобы получить необходимый результат?

Буду очень признателен тому, кто выложит программный код для этой простой программы, которая ввела меня в небольшой ступор!

[Konrad]

И так-с начнем...
Konstie, скажи что значит число кратное 3?

[Konstie]

Сообщение от Konrad

И так-с начнем...
Konstie, скажи что значит число кратное 3?

Число, делящееся на 3 без остатка (i mod 3)=0, входящее в данном случае в указанный промежуток. К чему этот вопрос?

[Konrad]

Сообщение от Konstie

К чему этот вопрос?

Увидишь.


Теперь...
Как сделать в делфи цикл от, скажем, 17 до 48 ?

Понятно....
Трудный вопрос?

Ну тогда полегче.
Как сделать цикл от 1 до 48 ?

[Konstie]

for i:=17 to 48 do ... ведь?

Просто при реализации такого же сценария со сменными a,b типа real возникают некоторые проблемы.

[Konrad]

Сообщение от Konstie

со сменными a,b типа real

И как ты собираешся вычислять делится ли число 35,545366766 на 3 без остачи?

Можно округлить же а и б и получим тип integer;

И так что мы имеем:

1. (i mod 3)=0

2. for i:=17 to 48 do

[Konrad]

Дальше сам догадаешся?

[Konstie]

Сообщение от Konrad

Дальше сам догадаешся?

Да, большое спасибо. Ошибки с типом переменных были допущены по невнимательности. Довел программу до рабочего состояния.

[NumLock]

Сообщение от Konrad

И как ты собираешся вычислять делится ли число 35,545366766 на 3 без остачи?

не знаю, считаю без остатка, что это уже перебор... к отношению к человеку...

[Konrad]

Сообщение от NumLock

уже перебор... к отношению к человеку...

по крайней мене я ему указал на удочку, а не на готовую рыбу.
И удочкой он воспользовался...

И вижу с него еще люди будут.

И мы даже выяснили что его знаний достаточно для написания такой программы, и я ему впринципе и не был нужен.