1.Реализовать программу, позволяющую переводить число из десятичной в двоичную систему счисления.
program blyatekzamen
integer, allocatable :: c(:)
real a,b
read(*,*)b
a=b
n=0
do while (a.ne.0)
a=int(a/2)
n=n+1
end do
allocate( c(n))
i=1
do while (b>=2)
b=b/2
a=(b-int(b))*2
b=int(b)
c(i)=a
i=i+1
end do
c(i)=b
write(*,100)(c(i),i=n,1,-1)
write(*,*)
pause
100 format (i1,\)
end
3.Дана строка до точки, группа символов между пробелами считается словом. Определить, сколько слов заканчивается буквой «о».
#include<iostream>
#include<string>
#include<math.h>
using namespace std;
int main() {
string str;
int k = 0;
getline(cin, str);
for (int i = 1;i < str.length();i++)
{
if ((str[i] == ' ') || (str[i] == '.')) {
if (str[i - 1] == 'o') {
k++;
}
}
}
cout << k << endl;
system("pause");
}