По разделам



Задача Proc 5


Описать процедуру RectPS(x1, y1, x2, y2, P, S), вычисляющую периметр P
и площадь S прямоугольника со сторонами, параллельными осям координат, по координатам (x1, y1), (x2, y2) его противоположных вершин
(x1, y1, x2, y2 — входные, P и S — выходные параметры вещественного типа). С помощью этой процедуры найти периметры и площади трех прямоугольников с данными противоположными вершинами.

Код (C/C++)

#include <bits/stdc++.h>

using namespace std;
void func (double x1, double y1, double x2, double y2, double &p, double &s)
{
    int a = abs(x1-x2);
    int b = abs(y1-y2);
    p = 2*(a+b);
    s = a*b;
}
int main()
{



    double x1, y1, x2, y2, p, s;
    for(int i = 0; i < 3; ++i){ // 
        cin >> x1 >> y1 >> x2 >> y2; //вводим данные числа
        func(x1, y1, x2, y2, p, s); // вызываем функцию
        cout << p << " " << s << endl;
    }

    return 0;
}

Код (Python)

import random

def RectPS(x1,y1,x2,y2,Result):
    a = abs(x1-x2)
    b = abs(y1-y2)
    print("a = ", a)
    print("b = ", b)
    Result['P'] = 2*(a+b)
    Result['S'] = a*b
    return

x1, x2 = random.sample(range(-10, 10), 2)
y1, y2 = random.sample(range(-10, 10), 2)
print("x1 = ",x1,"; y1 = ",y1)
print("x2 = ",x2,"; y2 = ",y2)
R = {'P' : None, 'S' : None}
RectPS(x1,y1,x2,y2,R)
print('P = ', R['P'])
print('S = ', R['S'])
									

Код (Pascal)

program Proc5;
 
procedure RectPS(x1,y1,x2,y2:Real; var P,S:Real);
begin
 P:=2*(abs(x1-x2)+abs(y1-y2));
 S:=abs(x1-x2)*abs(y1-y2);
end;
 
 
var
  i:Integer;
  x1,y1,x2,y2,P,S:Real;
 
begin
  Write('x1: ');
  Readln(x1);
  Write('y1: ');
  Readln(y1);
  Write('x2: ');
  Readln(x2);
  Write('y2: ');
  Readln(y2);
 
  RectPS(x1,y1,x2,y2,P,S);
  Writeln(P,' ',S);
end.
									




Proc. Абрамян
Proc 1 Просмотров: 11
Proc 2 Просмотров: 11
Proc 3 Просмотров: 9
Proc 4 Просмотров: 10
Proc 5 Просмотров: 11
Proc 6 Просмотров: 7
Proc 7 Просмотров: 10
Proc 8 Просмотров: 10
Proc 9 Просмотров: 10
Proc 10 Просмотров: 8
Proc 11 Просмотров: 12
Proc 12 Просмотров: 7
Proc 13 Просмотров: 11
Proc 14 Просмотров: 11
Proc 15 Просмотров: 10
Proc 16 Просмотров: 9
Proc 17 Просмотров: 18
Proc 18 Просмотров: 11
Proc 19 Просмотров: 12
Proc 20 Просмотров: 8
Proc 21 Просмотров: 10
Proc 22 Просмотров: 9
Proc 23 Просмотров: 7
Proc 24 Просмотров: 10
Proc 25 Просмотров: 7
Proc 26 Просмотров: 9
Proc 27 Просмотров: 12
Proc 28 Просмотров: 16
Proc 29 Просмотров: 19
Proc 30 Просмотров: 23
Proc 31 Просмотров: 10
Proc 32 Просмотров: 10
Proc 33 Просмотров: 8
Proc 34 Просмотров: 16
Proc 35 Просмотров: 6
Proc 36 Просмотров: 9
Proc 37 Просмотров: 9
Proc 38 Просмотров: 8
Proc 39 Просмотров: 11
Proc 40 Просмотров: 8
Proc 41 Просмотров: 11
Proc 42 Просмотров: 8
Proc 43 Просмотров: 8
Proc 44 Просмотров: 11
Proc 45 Просмотров: 12
Proc 46 Просмотров: 9
Proc 47 Просмотров: 7
Proc 48 Просмотров: 12
Proc 49 Просмотров: 9
Proc 50 Просмотров: 10
Proc 51 Просмотров: 16
Proc 52 Просмотров: 9
Proc 53 Просмотров: 11
Proc 54 Просмотров: 8
Proc 55 Просмотров: 10
Proc 56 Просмотров: 9
Proc 57 Просмотров: 8
Proc 58 Просмотров: 10
Proc 59 Просмотров: 7
Proc 60 Просмотров: 8

Комментарии

Чтобы написать комментарии вам нужно войти в систему или зарегистрироваться