Привет, помогите написать программу на си +. Известны значения максимальной…

лови) program c1; uses crt; var b: array[1… 3] of shortint; min: integer; max: integer; i: integer; begin for i: =1 to 3 do beginreadln (b[i]) if (i=1) then begin min: =b[i]; max: =b[i]; end; if (b[i]max) then begin max: =b[i] end; endif (min<0) then begin writeln (min*max); end else begin writeln (min+max); end; end.