( PYTHON )Скласти програму для розв’язання задачі: Обчислити значення функції для довільних дійсних значень аргументів.

Программа работает при условии, что введённые числа целые.

#include <iostream>
#include <string>

using namespace std;

int main()
{
    string S,P;
    char c[10000] = "";
    int C,z;
    double R = 1;
    getline(cin, S);
    S+=' ';
    for(int i = 0; i<S.length(); i++)
    {
            if(S[i] != ' '){
                 if(S[i] == '-'){z = -1; i++;}
                 else z = 1;
                 C = 0;
                 while((S[i] >='0')&&(S[i] <= '9'))
                 {
                        C = C*10 + (S[i] - '0');
                        i++;
                 }
                 C = C*z;
                 R*=C;
                 itoa(C,c,10);
                 if (z == -1)
                 {
                       P+='(';
                       P+=c;
                       P+=')';
                 }
                 else P+=c;
                 P+="*";
            }
    }
    P[P.length()-1] = '=';
    int d,s;
    P+=ecvt(R,4,&d,&s);
    S = P;
    cout << S << "\n";
    system("Pause");
    return 0;
}

// PascalABC.NET 3.0, сборка 1111
const
  alpha=['a'..'z'];
  digits=['0'..'9'];
var
  na,nd,i:integer;
  s:string;
begin
  na:=0; nd:=0;
  Write('Введите текст: '); Readln(s);
  for i:=1 to Length(s) do
    if s[i] in alpha then Inc(na)
    else
      if s[i] in digits then Inc(nd);
  if na>nd then Writeln('В тексте больше букв')
  else
    if na<nd then Writeln('В тексте больше цифр')
    else Writeln('В тексте букв и цифр поровну')
end.

Тестовое решение:
Введите текст: the equation 3.546x^2+4.18x-4.1=0
В тексте больше букв