Имя: Пароль:
1C
1С v8
Цикл по целым числам
,
0 Kseniya_12345
 
10.10.15
02:42
Как сделать перебор всех целых чисел и вывести столько, сколько задаст пользователь
1 Asmody
 
10.10.15
02:52
(0) Для целых больше нуля

Для ии=1 по СколькоЗадалПользователь Цикл
  Сообщить(ии);
КонецЦикла;
2 Defender aka LINN
 
10.10.15
03:28
(0) Прямо-таки ВСЕХ?
3 jurassic
 
10.10.15
05:07
(1) а почему это старт с единицы?
4 torgm
 
10.10.15
07:36
(3) учи матчасть, счетчик по порядковым номерам :)
а как раз таки в теле цикла выводится целое число
5 hhhh
 
10.10.15
07:50
(4) а 0 где? -1, -2?
6 jurassic
 
10.10.15
07:52
(4) перебрать надо все, а вывести сколько скажут. я вот хочу видеть результат для двух чисел: 88, 205
7 zak555
 
10.10.15
07:54
(4) т.е. начальным значением счётчика не может быть отрицательное число?
8 jurassic
 
10.10.15
08:12
Состояние("Скажешь, когда хватит...");
й=0;
Пока Истина Цикл
    Сообщить(й);
    Если Вопрос("Выведено "+2*й+1+" чисел. Хватит?", РежимДиалогаВопрос.ДаНет)=КодВозвратаДиалога.Нет Тогда
        Прервать;
    КонецЕсли;
    Сообщить(-й);
    Если Вопрос("Выведено "+2*й+2+" чисел. Хватит?", РежимДиалогаВопрос.ДаНет)=КодВозвратаДиалога.Нет Тогда
        Прервать;
    КонецЕсли;
    й=й+1;
КонецЦикла;
Предупреждение("Обработка завершена без перебора всех целых чисел");
9 jurassic
 
10.10.15
08:13
(8) да/нет перепутал
10 zak555
 
10.10.15
08:32
(3)

Для н = ПоследнееЧислоКотороеЗадалПользователь по ПервоеЧислоКотороеЗадалПользователь Цикл
    
    //всё намного проще
КонецЦикла;
11 zak555
 
10.10.15
08:34
(4) учи сам матчаст -- в цикл по счётчик начальное и конечное значение могут быть ЛЮБЫЕ ЦЕЛЫЕ числа (хоть отрицательные)
чтоб счётчик заработал --- начальное должно быть меньше конечного
12 trad
 
10.10.15
09:28
(11) меньше или равно
13 zak555
 
10.10.15
09:33
(12) согласен, опечатка =)
Закон Брукера: Даже маленькая практика стоит большой теории.