Нужно сделать ср по информатике 9 класс
(Оформить нужно как во втором вложении)

Question

Информатика: Нужно сделать ср по информатике 9 класс (Оформить нужно как во втором вложении)

aleksandrafrolo1 · Accepted Answer

Turbo Pascal

USES CRT;
VAR A:array[1..10] of integer;
B:array[1..5] of integer;
C:array[1..5] of integer;
i,bx,cx:integer;

BEGIN
CLRSCR;
Randomize;

For i:=1 to 10 do
begin
A[i]:=1+random(50);
Write(A[i],' ');
end;

Writeln;

bx:=1; cx:=1;

for i:=1 to 10 do
if (i mod 2 = 0) then
begin
B[bx]:=A[i];
bx:=bx+1;
end
else
begin
C[cx]:=A[i];
cx:=cx+1;
end;

For i:=1 to 5 do
Write(B[i],' ');

Writeln;

For i:=1 to 5 do
Write(C[i],' ');

READLN;
END.

Тема: обработка одномерных массивов задан массив а(10). сформировать из элементов массива а два масс

Тема: обработка одномерных массивов задан массив а(10). сформировать из элементов массива а два масс

Нужно сделать ср по информатике 9 класс (Оформить нужно как во втором вложении)

MOGZ ответил

Нужно сделать ср по информатике 9 класс
(Оформить нужно как во втором вложении)