1. 

   Suicidal Hedgehog New Member

   Срочно! Задача должна быть решена на языке програмирования турбо паскаля! "Найти сумму всех четных чисел из промежутка от A доB!"

    

   Suicidal Hedgehog, 16 янв 2010

   #1
2. 

   Delices New Member

   var i,s,a,b:integer;
   BEGIN
     read(a,b);
     s:=0;
     for i := a to b do
       if i mod 2 = 0 then
         s:= s + i;
     writeln(s);
   END.

    

   Delices, 16 янв 2010

   #2

Ваше имя или e-mail:

Пароль:

Забыли пароль?

Запомнить меня