Question

Помогите возвести каждый второй элемент массива в квадрат(паскаль)

Answer 1

const n = 15;

var

   a: array[1..n] of real;

   i, k: integer; 

begin

   for i:=1 to n do readln(a[i]);

   for i:= 1 to n do

   begin

       if i mod 2 = 0 then

       a[i]:= sqr(a[i]);

   writeln(a[i]);

   end;

end.

Answer 2

это и есть каждый второй элемент, Ннет?

Answer 3

Так я ввожу нечетные и они не возводятся

Answer 4

там если номер элемента четный (т. е. каждый второй элемент массива), то этот элемент заменяется его квадратом

Answer 5

Так если я пишу 2 числом нечетное то оно не возводится

Answer 6

ну да