Вариант 11 Дядя Федор, кот Матроскин и пес Шарик летом жили в Простоквашино, а папа с мамой слали им письма, посылки, телеграммы и бандероли, которые доставлял почтальон Печкин. Каждое письмо весило в среднем 100 г, каждая посылка - 5 кг, каждая телеграмма - 50 г, каждая бандероль - 500 г. Дядя Федор получил 10 писем, 2 посылки, 10 телеграмм и 1 бандероль. Кот Матроскин получил 4 письма, 1 посылку, 2 телеграммы и 1 бандероль. Пес Шарик не получил ни одного письма, ни одной телеграммы, зато получил 4 посылки и 2 бандероли.Построить электронную таблицу, из которой будет видно: сколько и какой почты получил каждый из трех жителей Про-стоквашино; сколько килограммов почты получил каждый из трех простоквашинпев; сколько весила вся доставленная Печкиным почта одного вида; какой общий груз пришлось перенести почтальону Печкину. смотри хls
Uses crt; var p,a,b,c,xa,xb,xc,ya,yb,yc,ab,ac,bc,xab,yab,xbc,ybc,xac,yac:real; s:real; begin writeln('Введите х координаты вершин а и b'); readln(xa,xb); writeln('Введите y координаты вершин а и b'); readln(ya,yb); xab:=xb-xa; yab:=yb-ya; ab:=sqrt(xab*xab+yab*yab); writeln('Введите х координаты вершин а и с'); readln(xa,xc); writeln('Введите y координаты вершин а и c'); readln(ya,yc); xac:=xc-xa; yac:=yc-ya; ac:=sqrt(xac*xac+yac*yac); writeln('Введите х координаты вершин b и с'); readln(xb,xc); writeln('Введите y координаты вершин b и c'); readln(yb,yc); xbc:=xc-xb; yab:=yc-yb; bc:=sqrt(xbc*xbc+ybc*ybc); p:=(ab+bc+ac)/ 2; s:=sqrt(p*(p-ab)*(p-bc)*(p-ac)); writeln(s); end.
Формула нахождения: Разделите значение "объем информации" на 8000
Решение: 42000 бит с делим на 8000=5,25 (килобайта)