Срешением!

имеется фрагмент алгоритма, записанный на алгоритмическом языке:

n : = длина(а)

i : = n

b : = ''

нц пока i > 1

с : = извлечь(а, i)

b : = склеить(c, b)

i : = i - 2

кц

здесь переменные a, b и с - строкового типа; переменные n, i – целые. в алгоритме используются следующие функции:

длина(х) – возвращает количество символов в строке х. имеет тип «целое».

извлечь(х,i) – возвращает i-й символ слева в строке х. имеет строковый тип.

склеить(х,у) – возвращает строку, в которой записаны подряд сначала все символы

строки х, а затем все символы строки у. имеет строковый тип.

значения строк записываются в кавычках (одинарных), например x='школа'.

какое значение примет переменная b после выполнения этого фрагмента алгоритма,

если переменная а имела значение 'abcdefgh'?

1) ‘hfdb’ 2) ‘bcde’ 3) ‘bdfh’ 4) ‘efgh’

Вот на С++:

#include <iostream>
#include <sstream>
#include <fstream>
#include <string>
#include <vector>
#include <deque>
#include <queue>
#include <stack>
#include <set>
#include <map>
#include <algorithm>
#include <functional>
#include <cstring>
#include <utility>
#include <bitset>
#include <cmath>
#include <cstdlib>
#include <ctime>
#include <cstdio>
#include <climits>typedef unsigned long long ulol;
typedef long double ld;
typedef long long lol;
typedef long int  li;#define mp          make_pair
#define F           first
#define S           second
#define sqr(a)      ( (a) * (a) )
#define pb          push_back
#define INF         999999999
#define ret(a)      cout << endl; system("pause"); return(a)
//#define ret(a)      return(a)using namespace std;int main()
{
    ld x;
    cin >> x;
    x = ( 8 / sqrt( x ) ) + sqrt(x);
    cout << x;
    ret(0);
}

Var a1, b1, c1, a2, b2, c2, p1, p2, s1, s2: real;
begin
  writeln('Введите строны первого треугольника: ');
  read(a1, b1, c1);
  writeln('Введите стороны второго треугольника: ');
  read(a2, b2, c2);
  p1 := (a1 + b1 + c1) / 2;
  p2 := (a2 + b2 + c2) / 2;
  s1 := sqrt(p1 * (p1 - a1) * (p1 - b1) * (p1 - c1));
  s2 := sqrt(p2 * (p2 - a2) * (p2 - b2) * (p2 - c2));
  if (s1 + 1e-3 > s2) and (s1 < s2 + 1e-3) then writeln('Равновеликие')
                                           else writeln('Неравновеликие');
end.