Есть несколько поросят одинаковой массы и несколько ягнят одинаковой массы. 3 поросёнка и 2 ягнёнка весят 22кг, а 2 поросёнка и 3 ягнёнка 23кг. Какова масса одного поросёнка и одного ягнёнка

Отрезок AD-бессектриса треугольникаABC.Через точку D проведена прямая,параллельная стороне AB и пересекающая сторону AC в точке F.Найдите углы треугольника ADF если угол BAC=72 градусом

 Одна яблуня займає 15 квадратих м площі саду. Скільки яблунь можна посадити на ділянці прямокутної форми, довжина якої 120 м, а ширина становить 2/3 довжини.

надо решать через Паскаль. составил две программы и обе со странным ответом. что не то?

program qwe;

uses crt;

var x.s:integer;

y:real;

begin

s:=0;

for i:= -2 to 27 do

s:=s+x;

y:=s/30

writeln('srednee arifmeticheskoe=',y);

readkey;

end.

program dada;

uses crt;

var i,s,o:integer;

begin clrscr;

s:=0;

o:=0;

for i:=-2 to 27 do

begin s:=s+1;

o:=o+1;

end;

writeln(s/o);

readkey;

end.