Составить программу в паскале для : найти периметр и площадь равнобедренного треугольника с основанием а и углом при основании 30°

//Pascal ABC.net версия 3.2 сборка 1387
begin
var a:=ReadReal();
writeln('S=',0.25*sqrt(a*a/3)*a);
writeln('P=',2*sqrt(a*a/3)+a);
end.

#include <iostream>

#include <vector>

using namespace std;

void solve(){

   int m,n;

   cin >> m >> n;

   vector<vector<int>> a(m,vector<int>(n));

   vector<bool> b(m, true);

   for(int i = 0; i < m; i++)

       for(int j = 0; j < n; j++)

           cin >> a[i][j];

   for(int i = 0; i < m; i++)

       for(int j = 1; j < n; j++)

           if(a[i][j] <= a[i][j-1])

               b[i] = false;

   for(auto i : b) cout << i << " ";

}

signed main(){

   solve();

}

В современных условиях, по утверждению ученых, формируется личность нового типа с высоким уровнем информационных потребностей и запросов. Это обусловлено особенностями исторического развития, изменениями в системе образования.

Забота о воспитании является важнейшей государственной задачей и одновременно привлекает внимание общественных объединений, средств массовой информации, религиозных конфессий.

Все школьные библиотеки должны стать центром общедоступной информации как для обучения, так и для личностного, духовного, творческого развития, самосовершенствования.

Школьная библиотека сегодня должна решать многофункциональные задачи в обществе, и, прежде всего, научить ребенка быть функционально грамотным и востребованным в современном мире.