Счастливым билетом называют такой билет с шестизначным номером, где сумма первых трех цифр равна сумме последних трех. Т. к. билет с номером 385916 - счастливый. 3+8+5=9+1+6. От меня требуется написать программу и блок схему, которая проверяет счастливость билета? Пожалуйста, друзья, помогите. Надо сегодня сделать эту заданию.

Program A1;varO:array[1..6] of integer;i:integer;beginwriteln('Vvedite chisla');for i:=1 to 6 do beginreadln(o[i]);end;if o[1]+o[2]+o[3]=o[4]+o[5]+o[6] then writeln('schastliviy') else writeln('neschastliviy');end.