1. Сформируйте и выведите целочисленный массив содержащий N первых положительных четных (нечетных) чисел 2. Сформируйте и выведите целочисленный массив содержащий степени двойки от первой до 16-й : 2,4,8,16,32 ....
1. Сформируйте и выведите целочисленный массив содержащий N первых положительных четных (нечетных) чисел
2. Сформируйте и выведите целочисленный массив содержащий степени двойки от первой до 16-й : 2,4,8,16,32 ....
Гость
Ответ(ы) на вопрос:
Гость{1}
const
n = 10; {количество чисел}
d = true; {true - для четных, false - для нечетных}
var
a : array [1..n] of integer;
i : integer;
begin
if d then
a[1] := 2
else
a[1] := 1;
write(a[1],' ');
for i := 2 to n do
begin
a[i] := a[i-1] + 2;
write(a[i],' ')
end
end.
{2}
const
n = 16;
var
a : array [1..n] of integer;
i : integer;
begin
a[1] := 2;
write(a[1],' ');
for i := 2 to n do
begin
a[i] := a[i-1] * 2;
write(a[i],' ')
end
end.
Не нашли ответ?
Похожие вопросы