могу ответить только на первый т.к. не очень сильно знаю 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;
}
Var s, n: integer;
begin
n:=10;
while(n<=20) do
begin
s:=s+n;
n:=n+1;
end;
writeln(s);
<span>end.</span>
151 в двоичной системе (10010111) тем самым единиц равняется 5.
Информа́ция<span> (от </span>лат. informātiō<span> — «разъяснение, представление, понятие о ч.-л.», от </span>лат. informare<span> — «придавать вид, форму, обучать; мыслить, воображать») — сведения, независимо от формы их представления</span>[1]<span>, воспринимаемые человеком или специальными устройствами как отражение </span>фактов материального мира<span> в процессе </span>коммуникации<span>
</span><span><span> знания о предметах, фактах, идеях и т. д., которыми могут обмениваться люди в рамках конкретного контекста (ISO/IEC 10746-2:1996)[4]; </span><span>знания относительно фактов, событий, вещей, идей и понятий, которые в определённом контексте имеют конкретный смысл (ISO/IEC 2382:2015)<span>[5]</span></span></span>
Program task;
var a,b,c,d,n,s:longint;
begin
writeln('vvedite chislo 4-значноe chislo');read(a);
b:= a div 1000;
c:= a div 100 mod 10;
d:= a div 10 mod 10 ;
n:= a mod 10;
writeln('n=',n);
writeln('b=',b);
writeln('c=',c);
writeln('d=',d);
writeln('s=',b+c+d+n);
end.