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 că ați accesat site-ul nostru dedicat Informatică. Sperăm că informațiile furnizate v-au fost utile. Dacă aveți întrebări sau aveți nevoie de asistență suplimentară, nu ezitați să ne contactați. Vă așteptăm cu drag să reveniți și nu uitați să ne salvați la favorite!