Помогите прописать простую задачу

[дфтын]

Код Выделить Развернуть

Процедура ВычислитьРезультат(Команда)
    Результат = 0;
    Для Счетчик  = ЭлементыФормы.поле1.Значение По ЭлементыФормы.поле2.Значение Цикл
        Если Счетчик%2 <> 0 Тогда   
            Результат = Результат + Pow(Счетчик, 2);
        КонецЕсли;
    КонецЦикла;
    ЭлементыФормы.Результат.Значение = Результат;
КонецПроцедуры

[SitnovaMarina]

спасибо большое за ответ. Извиняюсь, если вопрос покажется глупым. Где объект.поле1, объект.поле2 и объект.результат выдает ошибку и пишет, что переменная не определена. как это исправить?

Ну логика не меняется... Если для обычных форм то так:

Код Выделить Развернуть

Процедура КнопкаВыполнитьНажатие(Кнопка)
    Результат = 0;
    Для Счетчик  = поле1 По поле2 Цикл
        Если Счетчик%2 <> 0 Тогда   
            Результат = Результат + Pow(Счетчик, 2);
        КонецЕсли;
    КонецЦикла;
КонецПроцедуры


И как я поняла знания программирования вообще на 0 уровне, так что:

поле1 - реквизит обработки, помещайте на форму обработки
Поле2 - реквизит обработки, помещайте на форму обработки
Результат - реквизит обработки, помещайте на форму обработки

У этих реквизитов Тип указывайте "Число"

при создании обычной формы обработки она может по-умолчанию создаться с этими реквизитами (если на определенном шаге помощника создания формы галочками выделить реквизиты). Кнопка Выполнить создается тоже. Нужно в свойствах кнопки указать процедуру "КнопкаВыполнитьНажатие"

[Эльшад]

выдает ошибку в самой платформе. вот такой код общий
Процедура КнопкаВыполнитьНажатие(Кнопка)

Если Строчка1 > Строчка2 Тогда
Сообщить ("Ошибка во введенных данных!");
Строчка1 = 0;
Строчка2 = 0;
Возврат;
КонецЕсли;         
   
  Результат = 0;
    Для Счетчик  = ЭлементыФормы.Строчка1.Значение По ЭлементыФормы.Строчка2.Значение Цикл
       Если Счетчик%2 <> 0 Тогда   
          Результат = Результат + Pow(Счетчик, 2);
       КонецЕсли;
    КонецЦикла;
    ЭлементыФормы.Результат.Значение = Результат;
   
КонецПроцедуры

[SitnovaMarina]

Вам бы литературку почитать

[дфтын]

ой. почитайте книжки лучше. вы не понимаете программирование:)

[SitnovaMarina]

Код Выделить Развернуть


Процедура КнопкаВыполнитьНажатие(Кнопка)
Если поле1>Поле2 Тогда
Сообщить("Бла-бла-бла");
Поле1 = 0;
Поле2 = 0;
Иначе
    Результат = 0;
    Для Счетчик  = поле1 По поле2 Цикл
        Если Счетчик%2 <> 0 Тогда   
            Результат = Результат + Pow(Счетчик, 2);
        КонецЕсли;
КонецЦикла;
КонецЕсли;
КонецПроцедуры


Добавлено: 18 янв 2015, 17:28

ой. почитайте книжки лучше. вы не понимаете программирование:)

Подметили вместе =)

Не обижайтесь, не со зла!

[Эльшад]

спасибо вам большое. действительно обучение только начал(всего неделю). смотрю обучение в ютубе. буду дальше читать и узнавать

[SitnovaMarina]

Удачи!