#include
#include
#include
#include
int odd(int i)
{
return 2 * i + 1;
}
int square(int i)
{
return i * i;
}
typedef boost::counting_iterator counter;
typedef boost::transform_iterator transformer;
transformer odds(int n)
{
return transformer(counter(n), odd);
}
transformer squares(int n)
{
return transformer(counter(n), square);
}
int main()
{
using namespace std;
cout << "Enter vector length: ";
int n; cin >> n;
cout << inner_product( odds(0), odds(n), squares(0), 0 ) << endl;
Var
n:integer;
c:string;
begin
write('Введите число от 10 до 9999 ->');
readln(n);
Str(n,c);
writeln('Предпоследняя цифра в числе равна ',c[length(c)-1])
end.
Пример работы программы:
Введите число от 10 до 9999 ->1523
Предпоследняя цифра в числе равна 2
1.
program z2;
var a,g:real;
begin
readln(a);
g:=(a/22)*(56-22);
writeln(g:4:2);
end.
<span>
2.
program z3;
var n,a,b,c:integer;
sa,sb,sc:real;
begin
writeln('Ведите количество учеников:');
readln(n);
writeln('Введите сколько:5,4,3');
readln(a,b,c);
sa:=(a*100)/n;
sb:=(b*100)/n;
sc:=(c*100)/n; writeln('пятёрок:',sa:4:2,'%');
writeln('четвёрок:',sb:4:2,'%');
writeln('троек:',sc:4:2,'%');
<span>end. </span></span>
110-89=21
21+89=110 вот вроде правильно