Что будет напечатано? str: ='abcdefgh'; insert('abc', str, 3); write(str);

5+4 =9   на 9 лет дима старше ани ответ на 9 лет и ей будет 4 года можно так дима = х коля =х-5 аня = у тогда возраст коли   у+4  х-5=у+4 х-у=9 дима старше   ани на 9 лет если диме будет 13   то ане будет   13-9 =4 та как дима старше ани на 9 лет

1) 13-5=8(лет)-будет коле, когда диме будет 13 лет.

2)8-4=4(лет)-будет ане, когда диме будет 13

3)13-4=9(лет)-дима старше ани

var a,b,c,s,p: real;

begin

  read(a,b,c);

  p: =(a+b+c)/2;

  s: =sqrt(p*(p-a)*(p-b)*(p-c));

  write(s: 0: 2);

end.

 

вроде так

Program grapho; uses crt ,graphabc; var xc ,yc ,r1 ,r2 ,rc ,ro ,n ,i ,x ,y : integer;     a : real; begin repeat write ( 'количество отверстий от 3 до 7 n=' ); read (n ); until n in [3..7 ]; clrscr; hidecursor; xc : =windowwidth div 2; yc : =windowheight div 2; r1 : = 50; r2 : = 150; rc : = 100; ro : = 30; a : =2 *pi /n; circle (xc ,yc ,r2 ); circle (xc ,yc ,r1 );   for i : =1 to n do   begin   x : =xc +round (rc * cos (a *i ) );   y : =yc -round (rc * sin (a *i ) );   circle (x ,y ,ro );   end; end.