Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.11.25;
Скачать: CL | DM;

Вниз

цыклы   Найти похожие ветки 

 
Andrej   (2002-11-14 14:15) [0]

Помогите решить, пожалуйста на Delphi.
Даны два вещественных числа. Сколько на отрезке между ними целых чисел (отрезок включает в себя также и данные числа, если они целые).


 
MBo ©   (2002-11-14 14:20) [1]

если a<b то
n:=Floor(b)-Ceil(a)+1;


 
KoluChi ©   (2002-11-14 14:21) [2]

if (n1>0) and (n1<>trunc(n1)) then n1 := n1 + 1;
for I := trunc(n1) to trunc(n2) do
DoWith(I);


 
Alx2 ©   (2002-11-14 14:23) [3]

>KoluChi © (14.11.02 14:21)
А 2 + 2 вычислять как
Result := 2;
for k := 1 to 2 do Result := Result + 1


 
Бог   (2002-11-14 14:25) [4]

А причем здесь цыклы????


 
KoluChi ©   (2002-11-14 14:27) [5]

>Alx2 © (14.11.02 14:23)
Да нет, просто получить все целые числа (вопрос не так понял, слово ц ыклы сбило).



Страницы: 1 вся ветка

Текущий архив: 2002.11.25;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.014 c
1-82760
Таня
2002-11-15 14:31
2002.11.25
строки


3-82573
Youri
2002-11-04 13:47
2002.11.25
Количество пользователей в IB.


7-83019
goldzoloto
2002-09-21 13:46
2002.11.25
SOS SOS SOS .ЛЮДИ ПОДСКАЖИТЕ КАК РАБОТАТЬ С СЕТЕВОЙ КАРТОЙ


4-83045
Vit@ly
2002-10-13 23:19
2002.11.25
Обновить (зарефрешить) SysTray, TaskBar?


7-83020
daos
2002-09-16 11:51
2002.11.25
Как обновить рабочий стол в WinXP ?