По разделам



Задача Begin 19


Даны координаты двух противоположных вершин прямоугольника:
(x1, y1), (x2, y2). Стороны прямоугольника параллельны осям координат.
Найти периметр и площадь данного прямоугольника.

Код (C/C++)

#include <iostream>
#include <cmath>
using namespace std;
int main(){
	double x1,y1,x2,y2,a,b,p,s;
	cout << "Vvedite koordinatu x1: ";
	cin >> x1;
	cout << "Vvedite koordinatu y1: ";
	cin >> y1;
	cout << "Vvedite koordinatu x2: ";
	cin >> x2;
	cout << "Vvedite koordinatu y2: ";
	cin >> y2;
	a = abs(x1-x2);
	b = abs(y1-y2);
	p = (a+b)*2;
	s = a*b;
	cout << "Perimetr: " << p << endl;
	cout << "Ploshyad': " << s;
	return 0;
}

Код (Python)

import random

x1,x2 = random.sample(range(-10, 10), 2)
y1,y2 = random.sample(range(-10, 10), 2)

print("(x1, y1): ({0},{1})".format(x1, y1))
print("(x2, y2): ({0},{1})".format(x2, y2))
side1 = abs(x1 - x2)
side2 = abs(y1 - y2)
P = 2 * (side1 + side2)
S = side1 * side2
print("Сторона 1: ", side1)
print("Сторона 2: ", side2)
print("Периметр: ", P)
print("Площадь: ", S)
									

Код (Pascal)

program Begin19;
var
 x1,y1,x2,y2,P,S: Real;
begin
 Writeln('Введите значение координат певой точки прямоугольника: ');
 Write('Введите значение x: ');
 Readln(x1);
 Write('Введите значение y: ');
 Readln(y1);
 Writeln('Введите значение координат второй точки прямоугольника: ');
 Write('Введите значение x: ');
 Readln(x2);
 Write('Введите значение y: ');
 Readln(y2);
 P:=2*(abs(x1-x2)+abs(y1-y2));
 Writeln('Периметр прямоугольника равен: ',P);
 S:=abs(x1-x2)*abs(y1-y2);
 Writeln('Площадь прямоугольника равна: ',S);
end.
									




Begin. Абрамян
Begin 1 Просмотров: 45
Begin 2 Просмотров: 30
Begin 3 Просмотров: 30
Begin 4 Просмотров: 26
Begin 5 Просмотров: 30
Begin 6 Просмотров: 28
Begin 7 Просмотров: 28
Begin 8 Просмотров: 24
Begin 9 Просмотров: 26
Begin 10 Просмотров: 31
Begin 11 Просмотров: 39
Begin 12 Просмотров: 36
Begin 13 Просмотров: 29
Begin 14 Просмотров: 54
Begin 15 Просмотров: 28
Begin 16 Просмотров: 31
Begin 17 Просмотров: 29
Begin 18 Просмотров: 26
Begin 19 Просмотров: 33
Begin 20 Просмотров: 27
Begin 21 Просмотров: 26
Begin 22 Просмотров: 22
Begin 23 Просмотров: 15
Begin 24 Просмотров: 24
Begin 25 Просмотров: 17
Begin 26 Просмотров: 18
Begin 27 Просмотров: 23
Begin 28 Просмотров: 27
Begin 29 Просмотров: 31
Begin 30 Просмотров: 20
Begin 31 Просмотров: 25
Begin 32 Просмотров: 28
Begin 33 Просмотров: 26
Begin 34 Просмотров: 25
Begin 35 Просмотров: 27
Begin 36 Просмотров: 20
Begin 37 Просмотров: 28
Begin 38 Просмотров: 27
Begin 39 Просмотров: 25
Begin 40 Просмотров: 23

Комментарии

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