Это же легко!
1) 11-2=9
2)9-2=7
3)7-2=5
4)5*3=15
5)15-2=13
Вот и все!
Ответ:22212
#include <iostream>
using namespace std;
int main() {
for (int i = 1; i < 33; i *= 2) {
cout << i << endl;
}
return 0;
}
Var a,d,b,s:real;
begin
write('a = '); readln(a);
write('d = '); readln(d);
b:=sqrt(d*d-a*a);
s:=a*b;
writeln('S = ',s);
end.
Пример:
a = 4
d = 5
S = 12
<em>// PascalABC.NET 3.2, сборка 1439 от 09.05.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
var a:=ArrRandom(10,-10,10); a.Println;
Writeln('Сумма положительных: ',a.Where(x->x>0).Sum)
end.
<u>Пример</u>
3 -4 9 -5 2 1 6 -4 10 -2
Сумма положительных: 31
10 символов
32 = 2^5 => 5 бит/символ
10 * 5 = 50 бит