ПРОШУУУУУ, ПОМОООГИТЕЕЕ!! Составить программу на языке Паскаль С помощью одного цикла сформировать и вывести два одномерных массива размерностью по 8 элементов каждый. Массивы заполнить по формулам: a[i]=i^2+1 b[i]=2*i-1
ПРОШУУУУУ, ПОМОООГИТЕЕЕ!!
Составить программу на языке Паскаль
С помощью одного цикла сформировать и вывести два одномерных массива размерностью по 8 элементов каждый. Массивы заполнить по формулам:
a[i]=i^2+1
b[i]=2*i-1
Гость
Ответ(ы) на вопрос:
Гостьprogram od;
var
a, b: array[1..8] of integer;
i: integer;
begin
for i := 1 to 8 do
begin
a[i] := Sqr(i) + 1;
b[i] := 2 * i - 1;
end;
end.
Не нашли ответ?
Похожие вопросы