Текущий архив: 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.013 c
