Христофор
6 год назад
ПРОШУУУУУ, ПОМОООГИТЕЕЕ!!
Составить программу на языке Паскаль
С помощью одного цикла сформировать и вывести два одномерных массива размерностью по 8 элементов каждый. Массивы заполнить по формулам:
a[i] = i^2+1
b[i] = 2*i-1
ОТВЕТЫ
Nelusup
Jul 22, 2019
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.
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.
183
Смежные вопросы:
