1)Даны два массива A(10) и В(10) Нужно сформировать массив С(10) предварительно определив его длину, Включая из массивов А и В только четные по номеру э
10-11 класс
|
лементов. И нужно вывести на экран массивы А(10), В(10), С(10). 2) Информация о средней суточной температуре воздуха за месяц задана в виде массива. Определите и выведите на экран, сколько раз температура была ниже среднемесячной.
помогите
const N=10
var i,k:integer;
A:array [1..N] of integer;
B:array [1..N] of integer;
C:array [1..N] of integer;
begin
for i:=1 to N do
begin
read(A[i]);
end;
k:=1;
for i:=1 to N do
begin
if i mod 2=0 then C[k]:=A[i];
k:=k+1;
end;
for i:=1 to N do
begin
read(B[i]);
end;
for i:=1 to N do
begin
if i mod 2 = 0 then C[k]:=B[i];
k:=k+1;
end;
for i:=1 to N do
begin
write(A[i]);
end;
for i:=1 to N do
begin
write(B[i]);
end;
for i:=1 to N do
begin
write(C[k]);
end;
Другие вопросы из категории
Читайте также
элементы, а из массива В -нечетные по значению.Выведите на экран массивы А,В,С.
2.Информация о площадях и средней урожайности хранится в массиве,где каждый элемент с четным индексом - засеянная площадь, а с нечетным - урожайность.Определите и выведите на экран кол-во собранной пшеницы и среднюю урожайность.
Помогите пожалуйста!
не содержат "семерок" в восьмеричном представлении.
X(2) - то же для массива Q;
X(3) - то же для массива P.
Вычисление суммы элементов массива, значения которыхлежит в интервале [2;4], оформить в виде подпрограммы.
PascalABC
Вот такие задачи нам задают.Прошу помощи.Заранее спасибо =)