program dom;
var
a,b,e,c,d,g: integer;
x,y:real;
begin
randomize;
 a:=random(10)+2;
 b:=random(15)+2;
 e:=random(20);
 c:=random(25)+2;
 d:=random(30)+2;
 g:=random(35);
{a:=2;
b:=3;
e:=12;
c:=4;
d:=1;
g:=14;}
writeln('*********************************************************');
writeln('*              Tere, äpilased!                          *');       
writeln('*         Meil on värrandi ssteem:                     *');
writeln('*  {',a:2,'x+',b:2,'y=',e:2,'                                          *');
writeln('*  {',c:2,'x+',d:2,'y=',g:2,'                                          *');
writeln('*                                                       *');
writeln('*   1)        Leiame x esimesest värrandist:            *');
writeln('*      x=(',e:2,'-',b:2,'*y',')/',a:2,'                                   *');
writeln('*                                                       *');
writeln('*   2)        Asetame x teise värrandisse:              *');
writeln('*   ',c:2,'*(',e:2,'-',b:2,'*y)','+',a*d:3,'*y=',a*g:3,'                              *');
writeln('*   y=',(g*a-c*e)/(d*a-c*b):7:2,'                                           *');
y:=(g*a-c*e)/(d*a-c*b);
writeln('*                                                       *');
writeln('*   3) x=','(',e:2,'-',b*((g*a-c*e)/(d*a-c*b)):7:2,')','/',a:2,'':32, '*');
writeln('*       ','Vastus: x=',(e-b*y)/a:7:2 ,'                               *');
writeln('*                  y=',(g*a-c*e)/(d*a-c*b):7:2,'                            *');
writeln('---------------------------------------------------------');
writeln('Kas te käik said aru?');
writeln('Kui ei saanud aru, siis tehke veel kord.');
writeln('Head aega!');
writeln('*********************************************************');
 end.