Определите какое число будет выведено на экран в результате работы следующей программы: var i: integer; k, s: real; begin while s<0.9 do begin i:=i+1; k:=1/(2*i); s:=s+k; end; write(i); end.

1)
#include <iostream>
#include <string>
#include <windows.h>
using namespace std;

int main()
{
  setlocale (LC_ALL,"Rus");
  SetConsoleCP(1251);
  SetConsoleOutputCP(1251);
  cout <<"Введите строку: " <<endl;
  string str;
  getline (cin,str);
  for (int i = 0; i<=str.size()-1; i++)
  {
   if (str.at(i) == 'а')
    str.at(i) = 'А';
   else if (str.at(i) == 'б')
    str.at(i) = 'Б';
  }
  cout <<endl;
  cout <<"Результат: " <<endl;
  cout <<str <<endl;
  return 0;
}

2)
#include <iostream>
#include <string>
using namespace std;

int main()
{
  setlocale (LC_ALL,"Rus");
  SetConsoleCP(1251);
  SetConsoleOutputCP(1251);
  cout <<"Введите строку: " <<endl;
  string str;
  getline (cin,str);
  bool f = true;
  for (int i = 0; i<=(str.size()-1)/2; i++)
  {
   if (str.at(i)!=str.at(str.size()-1-i))
   {
    f = false;
    break;
   }
  }
  cout <<"Результат: " <<endl;
  if (f)
   cout <<"палиндром" <<endl;
  else cout <<"не палиндром" <<endl;
  return 0;
}

1) В земной коре вещества под давлением в сжатом состоянии - минимальное количество места при определенном количестве вещества - порядок
началось извержение вулкана - хаос - вещество выходит на поверхность Земли беспорядочно: газы, пепел, магма во время взрывов и толчков выходят неравномерно
2) Серебряная ложка - вещество серебро в порядке
Серебряная ложка в воде - происходит перемещение молекул серебра в воду - молекулы серебра в воде находятся уже в состоянии хаоса
3) Ночь - пчелы в улье спят - порядок.
Утро - пчелы в поисках медоносных растений разлетаются беспорядочно - хаос