1.Кратко опишите услугу, с которой Вы познакомились на портале госуслуг самостоятельно,и она оказалась востребованной для Васна сегодняшний день.2.Какие цели должно выполнять электронное правительство?3.Кто может бесплатно зарегистрировать учётную запись пользователя ЕСИА?4.Какую услугу, на Ваш взгляд, необходимодобавить на портал государственных услуг РФ?5.Кто является оператором ЕСИА?6.Можетли оператор ЕСИА передать персональные данные пользователя третьей.​

PascalABC.NET 3.4.2, сборка 1864 от 11.11.2018Внимание! Если программа не работает, обновите версию!

begin

 var c := ReadlnString;

 if c.Any(t -> not (t in ['0'..'9'])) then

 begin

   Print('Ошибка ввода');

   exit

 end;

 var a := c.Select(t -> t.ToDigit).ToArray;

 Writeln('a) ', c.Where(t -> t = '9').Count);

 Writeln('б) ', a.Where(t -> t = a[0]).Count);

 Writeln('в) ', a.Where(t -> t.IsOdd).Count);

 Writeln('г) ', a.Where(t -> t < 3).Sum);

 Writeln('д) ', a.Where(t -> t.IsEven and (t > 4))

     .Aggregate(1, (p, q)-> p * q));

 Writeln('е) ', a.Where(t -> (t = 2) or (t = 3)).Count);

end.

Пример1764963253120a) 1б) 2в) 7г) 6д) 36е) 4Примечание: количество цифр в числе практически не ограничено, контроль на ввод "не-цифр" имеется.

могу ответить только на первый т.к. не очень сильно знаю c++

#include <bits/stdc++.h>

 

using namespace std;

 

int main()

{

   ifstream fin("c:\input.txt");

   string s,sr;

   int j;

   bool f=true;

   while(getline(fin,s))

   {

       for(int i=0;i<s.length();++i)

       {

           

           if((s[i]>='a' && s[i]<='z') ||

              (s[i]>='A' && s[i]<='Z'))

           {

               sr=sr+s[i];

               f=true;

           }

       }

   }

   cout<<sr;

}