Не знаю правильно или нет но логически.
В истории финикийцы известны, прежде всего, как предприимчивые торговцы и отважные мореплаватели. Они имели многочисленные колонии по всему Средиземноморью, их торговые корабли плавали и на Британские острова, и в Индию. Услугами моряков-финикийцев пользовались многие соседние государства.
Надо ли говорить, как необходимо было правителям Финикии, купцам и мореплавателям простая и надежная письменность. Соседствуя с Египтом, финикийцы хорошо знали египетское письмо. Известна им была и клинопись. Но слишком сложными казались им эти письмена — им нужно было что-то более доступное, практичное. И это «что-то» они нашли в изобретении гиксосов. Алфавит гиксосских писцов не успел получить окончательного оформления в систему письменности по причине кратковременности существования гиксосского государства. Взяв его за основу, в Южной Финикии была создана своя система письменности.
Финикийский алфавит состоял из 22 знаков (букв), следовавших друг за другом в строгой последовательности. Сами знаки-буквы имели простую для написания и запоминания форму. Каждый знак-буква выражал определенный согласный звук. Финикийцы дали буквам свои названия: для каждой буквы они подобрали слово, где первый звук соответствовал данной букве.
#include <iostream>
using std::cout;
using std::cin;
using std::endl;
#include <cmath>
using std::pow;
using std::sqrt;
double vpisannayaOkryzhnost(double);
double opisannayaOkryzhnost(double);
int main()
{
double perimeter;
cout << "Vvedite perimeter: ";
cin >> perimeter;
cout << "r vpisannoi okruzhnosti = " << vpisannayaOkryzhnost(perimeter) << endl;
cout << "R opisannoi okruzhnosti = " << opisannayaOkryzhnost(perimeter) << endl;
cin.get();
return 0;
}
double vpisannayaOkryzhnost(double perimeter)
{
double a = perimeter / 4;
return (a / 2);
}
double opisannayaOkryzhnost(double perimeter)
{
double a = perimeter / 4;
return (sqrt(2) / 2 * a);
}
На Гэ-паскале можно написать так:
program math;
var perimeter, a: real;
begin
write('Vvedite perimeter: ');
read(perimeter);
a := perimeter / 4;
writeln('r vpisannoi okruzhnosti = ', a / 2:0:2);
writeln('R opisannoi okruzhnosti = ', sqrt(2) / 2 * a:0:2);
readln();
readln();
end.
