Дано: writeln (s:6:2);
если s=112,79682, то на экране появиться

var i,j,k:integer;
var f:text;
var a:array[0..35] of string =('a', 'b', 'c', 'd', 'e', 'f', 'g',
                             'h', 'i', 'j', 'k', 'l', 'm', 'n',
            'o', 'p', 'q', 'r', 's',
            't', 'u','v', 'w', 'x', 'y', 'z', '0', '1', '2', '3', '4',
            '5', '6', '7', '8', '9');
begin
  assign (f, 'text.txt');
  rewrite(f);
  for i:=0 to 35 do
    for j:=0 to 35 do
       for k:=0 to 35 do
        writeln(f ,(a[i]+a[j]+a[k]));
  close(f);
  readln;
end.
Нужно создать text.txt в директории откуда будет запускаться программа.

#include <iostream>

using namespace std;

struct my{

   int x;

   int y;

}

void S_size() ;

int main()

{
   my my_struct = new my[5];

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

{

  cin >> my_struct[i].x;

  cin >> my_struct[i].y;

} 

S_size();

}

S_size()

{

  double S = 0.5*((my_struct[0].x*my_struct[1].y)-(my_struct[1].x *my_struct[0].y))*((my_struct[1].x * my_struct[2].y)-(my_struct[2].x*my_struct[1].y))*((my_struct[2].x * my_struct[3].y)-(my_struct[3].x*my_struct[2].y))*((my_struct[3].x * my_struct[4].y)- (my_struct[4].x*my_struct[3].y));

cout << S ;

}