Вопрос по информатике:
СРОЧНО ДАМ 14 БАЛОВ
СРОЧНО ПОМОГИТЕ
СОСТАВИТЬ ПРОГРАММУ В ПАСКАЛЕ НАХОЖДЕНИЯ ПЕРИМЕТРА ПРЯМОУГОЛЬНИКА ПО ЗАДАННЫМ КООРДИНАТАМ ЕГО ВЕРШИН АBCDE
Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 20.06.2016 17:14
- Информатика
- remove_red_eye 17559
- thumb_up 26
Ответы и объяснения 2
Var ax,ay,bx,by,cx,cy,dx,dy,p:real;
begin
write ('Введите координаты точки A: ');
read (ax,ay);
write ('Введите координаты точки B: ');
read (bx,by);
write ('Введите координаты точки C: ');
read (cx,cy);
write ('Введите координаты точки D: ');
read (dx,dy);
p:=abs(2*((by-ay)+(cx-bx)));
writeln;
writeln ('Периметр = ',p);
end.
- 21.06.2016 00:05
- thumb_up 46
Var
Ax,Ay,Cx,Cy,P:real;
begin
Writeln('Введите координаты x,y любой вершины прямоугольника: ');
Read(Ax,Ay);
Writeln('Введите координаты x,y диагональной вершины прямоугольника: ');
Read(Cx,Cy);
P:=2*(Abs(Cx-Ax)+Abs(Cy-Ay));
Writeln('Периметр прямоугольника равен ',P)
end.
Тестовое решение:
Введите координаты x,y любой вершины прямоугольника:
2 10
Введите координаты x,y диагональной вершины прямоугольника:
-8 3
Периметр прямоугольника равен 34
- 22.06.2016 16:50
- thumb_up 25
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.