program pryam;
var y1, y2, y3, x1, x2 : real;
begin
writeln ('введите координату (у) верхней точки прямой');
readln (y1);
writeln ('введите координату (у) нижней точки прямой');
readln (y2);
writeln ('введите координату (х) точек-концов прямой');
readln (x1);
writeln ('введите координату (у) точки, принадлежность к прямой которой нужно определить');
readln (y3);
writeln ('введите координату (х) точки, принадлежность к прямой которой нужно определить');
readln (x2);
if (y3< =y1) and (y3> =y2) and (x2=x1) then writeln (' принадлежит ')
else writeln (' не принадлежит ');
readln;
end.
Объяснение:
Хотя слово «центнер» немецкого происхождения и означает «сто мер», традиционно в Германии в старину за меру веса принимали не килограмм, а фунт, который соответствует приблизительно 500 граммам. То есть 100 фунтов — 50 килограммов. Этой мерой веса в старину пользовались люди, занятые в сельском хозяйстве: например, центнер картофеля — полный мешок, 50 кг. В разных частях Германии центнер был разный: в Баварии, например, — 56 кг; в Брауншвейге — 46,77 кг; в Саксонии — 51,4 кг. Сейчас в Германии берётся усреднённая величина 50 кг[1].
:)
всего доброго
Поделитесь своими знаниями, ответьте на вопрос: