Var W,x,m:real; Begin Read(x,m); If (3*x-1<0) then W:=((7-2*x)*(7-2*x)*(7-2*x)*m) / (1-3*x) else W:=((7-2*x)*(7-2*x)*(7-2*x)*m) / (3*x-1); Writeln(W); End.
Vă mulțumim pentru vizita pe site-ul nostru dedicat Informatică. Sperăm că informațiile disponibile v-au fost utile și inspiraționale. Dacă aveți întrebări sau aveți nevoie de suport suplimentar, suntem aici pentru a vă ajuta. Ne face plăcere să vă revedem și vă invităm să adăugați site-ul nostru la favorite pentru acces rapid!