1. 

   zaniato New Member

   Найти нечетные элементы массива и их квадраты НА ПАСКАЛЕ

    

   zaniato, 19 мар 2010

   #1
2. 

   SeregaK New Member

   я так понял нужно ЗАМЕНИТЬ нечетные элементы на их квадраты. в следующий рас пишите условие яснее.
   Решение:
    
   const n=3;
   var a:array[1..n] of integer;
   i:integer;
   begin
   for i:=1 to n do read(a);
   for i:=1 to n do
   if a mod 2<>0 then a:=sqr(a);
   for i:=1 to n do write(a);
   end.
   

    

   SeregaK, 19 мар 2010

   #2

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

Пароль:

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

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