Порівняй вагу хлопчика богдана та дівчинки наталки. користувач має ввести два числа, що відпові вазі хлопчика ті дівчинки, а програма вивести ім'я та вагу важчоі дитини на языке пайтона

Var
A:array[1..1000] of integer;
B:array[1..3] of integer;
i,N:integer;
Begin
Write('N = ');ReadLn(N);
For i:= 1 to N do
    Begin
    Read(A[i]);
    if A[i] mod 2 <> 0 then B[1]:=B[1]+A[i];
    if A[i] mod 2 = 0 then B[2]:=B[2]+A[i];
    End;
WriteLn;
For i:= 1 to N do
    Write(A[i],' ');
B[3]:=B[1]+B[2];
WriteLn('B[1] = ',B[1]);
WriteLn('B[2] = ',B[2]);
WriteLn('B[3] = ',B[3]);
End.

или так:

Var
A:array of integer;
B:array[1..3] of integer;
i,N:integer;
Begin
Write('N = ');ReadLn(N);
A:=new integer[N];
For i:= 0 to N-1 do
    Begin
    Read(A[i]);
    if A[i] mod 2 <> 0 then B[1]:=B[1]+A[i];
    if A[i] mod 2 = 0 then B[2]:=B[2]+A[i];
    End;
WriteLn;
For i:= 0 to N-1 do
    Write(A[i],' ');
B[3]:=B[1]+B[2];
WriteLn('B[1] = ',B[1]);
WriteLn('B[2] = ',B[2]);
WriteLn('B[3] = ',B[3]);
End.

1. Страница — одна сторона листа (или листа) из бумаги, пергамента или другого материала (или электронных средств массовой информации) в книге, журнале, газете, или другой набор листов, на которых текст или иллюстрации могут быть напечатаны, написаны или нарисованы, для создания документов.
2. Протокол передачи данных — набор определённых правил или соглашений интерфейса логического уровня, который определяет обмен данными между различными программами.
3. Web-страница - гипертекстовый документ в интернете
4. Гиперте́кст — термин, обозначающий систему из текстовых страниц, имеющих перекрёстные ссылки, составленные как по вертикали, так и по горизонтали.
5. Провайдер— организация, предоставляющая услуги доступа к сети Интернет и иные связанные с Интернетом услуги.
6. Телевизор, телевизионный приёмник — приёмник телевизионных сигналов изображения и звукового сопровождения, отображающий их на экране и с динамиков.
7. Сайт, или веб-сайт— одна или несколько логически связанных между собой веб-страниц; также место расположения контента сервера.