Составить блок-схему и нaписать программу на языке паскаль для нажождения периметра произвольного четырехугольника, - id728252120210712 от botatj 12.07.2021 12:02

Question

Информатика: Составить блок-схему и нaписать программу на языке паскаль для нажождения периметра произвольного четырехугольника, длины всех сторон вводятся с клавиатуры

botatj · Accepted Answer

#include iostream #include iomanip using namespace std; void Fun(int n) { if (n != 3) {  double x1; double y1; double x2; double y2; double x3; double y3;  cin x1 y1 x2 y2 x3 y3;  double a = sqrt((x1 - x2)*(x1 - x2) + (y1 - y2)*(y1 - y2));  double b = sqrt((x2 - x3)*(x2 - x3) + (y2 - y3)*(y2 - y3));  double c = sqrt((x3 - x1)*(x3 - x1) + (y3 - y1)*(y3 - y1));  double p = (a + b + c) / (double)2;  double s = sqrt(p*(p - a)*(p - b)*(p - c));  cout setprecision(6) fixed s; } if (n != 6) {  double a;...

Составить блок-схему и нaписать программу на языке паскаль для нажождения периметра произвольного четырехугольника, длины всех сторон вводятся с клавиатуры

MOGZ ответил