Преобразуйте код из pascal в с++ var x, y, z, min: real; begin write('x, y, z: '); readln(x, y, z); if x+y+z/2 else min: =x*y*z; writeln('min2(x + у + z/2, xyz) + 1 = ', min+1: 0: 3); readln; end.

Ну  как-то так.  program prog; const n=2; var rc,rp,hc,hp,vc,vp: real; begin writeln('введите радиус и высоту цилиндра'); readln(rc); readln(hc); writeln('введите высоту призмы'); readln(hp); vc: =(rc*rc)*3.14*hc; rc: =rc/2; vp: =(rc*rc)*1.5*sqrt(3)*hp; if(vc> vp) then writeln('аквариум формы цилиндра больше,воды уйдет больше'); if(vc< vp) then writeln('аквариум формы шестигранной призмы больше,воды уйдет больше'); if(vc=vp) then writeln('аквариумы равны,воды будет по ровну'); end.

Как-то так) var a,b,c,d,e,f: integer; function nod(m,n: integer): integer; begin while m< > n do if m> n then m: =m-n         else n: =n-m; nod: =m end; begin write('введите числитель1, знаменатель1, числитель2, знаменатель2'); readln(a,b,c,d); e: =a*d+b*c; f: =b*d;   if f=0 then write('на 0 делить нельзя') else if e=0 then writeln('сложение =    ',e)        else begin         e: =e div nod(abs(e),f);           f: =f div nod(abs(e),f);           writeln('сложение =  ',e,'\',f);           end; e: =a*c; f: =b*d;   if f=0 then write('на 0 делить нельзя') else if e=0 then writeln('умножение =  ',e) else begin   e: =e div nod(abs(e),f);         f: =f div nod(abs(e),f);         writeln('умножение =  ',e,'\',f);           end; e: =a*d; f: =b*c; if f=0 then write('на 0 делить нельзя') else           if e=0 then writeln('деление=    ',e) else begin  e: =e div nod(abs(e),f);         f: =f div nod(abs(e),f);         writeln('деление =  ',e,'\',f);           end;         end.