1. 

   S-Andrey New Member

   составить программу вычисления суммы квадратов всех целых чисел от -20 до 30

    

   S-Andrey, 3 апр 2010

   #1
2. 

   Симон New Member

   var i,s:integer;
   begin
   s:=0;
   for i:=-20 to 30 do
   s:=s+i*i;
   Writeln(s);
   end.
    
    
   Вопросы, ошибки, недочеты в ЛС

    

   Симон, 3 апр 2010

   #2

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

Пароль:

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

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