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

Question

Найти нечетные элементы массива и их квадраты

НА ПАСКАЛЕ

Answer 1

я так понял нужно ЗАМЕНИТЬ нечетные элементы на их квадраты. в следующий рас пишите условие яснее.

Решение:

 

const n=3;
var a:array[1..n] of integer;
i:integer;
begin
for i:=1 to n do read(a[i]);
for i:=1 to n do
if a[i] mod 2<>0 then a[i]:=sqr(a[i]);
for i:=1 to n do write(a[i]);
end.