procedure trapezoid(a, sl, c: real; var b, S, h, d: real);
begin
b := 2 * sl - a;
h := Sqrt(c * c - Sqr((a - b) / 2));
S := h * (a + b) / 2;
d := Sqrt(sl * sl + h * h);
end;
begin
var a := 10;
var sl := 7;
var c := 5;
var b, S, h, d: real;
trapezoid(a, sl, c, b, S, h, d);
Print(b, S, h, d)
end.
Я правильно понял, программирование? На каком языке это написать?
1) 26 символов = по другому 2 в 5 степени (с остатком);
2) 240 * 5 = 1200 бит
===== PascalABC.NET =====
begin
ArrRandom(10, -99, 99)
.Println
.Where(p -> p.IsOdd)
.Sum
.Println
end.
#include<iostream>
using namespace std;
void main()
{
setlocale(LC_ALL, "rus");
int num;
cout << "Введите разрядность процессора ПК: ";
cin >> num;
if (num == 32)
cout << "Установка только OC 32 бит\n";
if (num == 64)
cout << "Установка ОС 32 и 64 бит\n";
if (num != 32 && num != 64)
cout << "Разрядность задана неправильно\n";
system("pause");
}