Написать программу: нечетным элементам одномерного массива присвоить значения квадратов индексов.
Написать программу: нечетным элементам одномерного массива присвоить значения квадратов индексов.
Гость
Ответ(ы) на вопрос:
Гость//PascalABC.Net 3.2
begin
var a:=ReadArrInteger ('Вводите массив: ', readinteger('Кол-во элементов: '));
for var i:=0 to length(a)-1 do if a[i].isodd then a[i]:=sqr(i+1);
a.Println;
a.Println;
end.
Не нашли ответ?
Похожие вопросы