begin Write('Введите через пробел координаты точки А: '); Readln(x1, y1); Write('Введите через пробел координаты точки B: '); Readln(x2, y2); Write('Введите через пробел координаты точки C: '); Readln(x3, y3); L := sqrt(sqr(x2 - x1) + sqr(y2 - y1)) + sqrt(sqr(x3 - x1) + sqr(y3 - y1)); Write('Сумма длин AB+AC равна ', L:0:3) end.
Тестовое решение: Введите через пробел координаты точки А: -3 2 Введите через пробел координаты точки B: 4.3 1.8 Введите через пробел координаты точки C: 0 7 Сумма длин AB+AC равна 13.134
В двух словах - информация это то, с чего мы описываем различия объектов. Не было бы различий - не было бы информации.
Еще иногда информацию называют знаниями.
Используем мы информацию для того, чтобы сделать какие-то прогнозы. Данные прогнозы нам жить комфортнее. Например мы получили информацию, что готовится преступление - мы можем его предупредить, или мы провели исследования аэродинамики, получили статистические данные (информацию) и использовали её в кузовах автомобилей. Автомобили стали потреблять меньше бензина и пр.
x1, x2, x3, y1, y2, y3, L: real;
begin
Write('Введите через пробел координаты точки А: ');
Readln(x1, y1);
Write('Введите через пробел координаты точки B: ');
Readln(x2, y2);
Write('Введите через пробел координаты точки C: ');
Readln(x3, y3);
L := sqrt(sqr(x2 - x1) + sqr(y2 - y1)) + sqrt(sqr(x3 - x1) + sqr(y3 - y1));
Write('Сумма длин AB+AC равна ', L:0:3)
end.
Тестовое решение:
Введите через пробел координаты точки А: -3 2
Введите через пробел координаты точки B: 4.3 1.8
Введите через пробел координаты точки C: 0 7
Сумма длин AB+AC равна 13.134
Еще иногда информацию называют знаниями.
Используем мы информацию для того, чтобы сделать какие-то прогнозы. Данные прогнозы нам жить комфортнее. Например мы получили информацию, что готовится преступление - мы можем его предупредить, или мы провели исследования аэродинамики, получили статистические данные (информацию) и использовали её в кузовах автомобилей. Автомобили стали потреблять меньше бензина и пр.