Дан массив С(10). Сформируйте из него массивы А(5) и В(5), предварительно определив их длину. В массив А включите элементы из массива С с четными
1-4 класс
|
индексами,
program Massivi;
var
i: Byte;
c: array [1..10] of Integer;
a, b: array [1..5] of Integer;
begin
// Zapolnee massiva c:
for i:=1 to 10 do
begin
//
Wtire('C['+IntToStr(i)+']=');
ReadLn(C[i]);
end;
// Formirovanie massivov a i b.
for i:=1 to 10 do
//
if i mod 2 = 0 then a[i div 2]:=c[i] else b[i div 2 + 1]:=c[i];
//
Write('Massiv a: ');
//
for i:=1 to 5 do Write(IntToStr(a[i])+', ');
//
WriteLn('');
//
Write('Massiv b: ');
//
for i:=1 to 5 do Write(IntToStr(b[i])+', ');
//
WriteLn('');
//
Write('Massiv c: ');
//
for i:=1 to 10 do Write(IntToStr(c[i])+', ');
end.
Другие вопросы из категории
характеристикой_________.(Слова которые надо вставить: Папка размещёния, имя файла, размер файла, дата создания, объект, файл.)
Компьютер может исполнять алгоритмы , написанные человеком на одном из языков программирования и введённые в его память .
Объект , исполняющий алгоритм, - это исполнитель алгоритма .
Человек и компьютер могут быть исполнителями алгоритма.
Читайте также
( Напишите полную программу)
своим индексам, увеличенным на один. Значение a описать в разделе констант. Выведите массив в строчку.