написать программный код по блок схеме надо​

program Powerdyflex;

var

A1, B1, A2, B2, B3, C1, C2, C3: integer;

begin

Readln(A1, B1, A2, B2, B3);

C1 := A1 + B2;

C2 := A2 + B2;

C3 := C2 + B3;

Writeln('C1=', C1, ' ', 'C2=', C2, ' ', 'C3=', C3);

end.