1. 

   Дим-он New Member

   Составить программу, которая создает массив C из N случайных элементов из промежутка [-70;50] и находит сумму отрицательных элементов.

    

   Дим-он, 15 янв 2010

   #1
2. 

   0007 New Member

   Uses crt;
   const n=10;
   var c:array[1..n] of integer;
   i,s:integer;
   begin
   randomize;
   s:=0;
   for i:=1 to n do
   begin
   c:=random(121)-70;
   writeln(c);
   if c<0 then s:=s+c;
   end;
   writeln;
   writeln(s);
   end.
   
   
   

    

   0007, 15 янв 2010

   #2

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

Пароль:

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

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