Const n = 10;
var b: Integer;
var a: array[1..n] of integer;
begin
for var i := 1 to n do
begin
Read(a[i]);
b+=a[i];
end;
Writeln(b/n);
end.
Ответ С. <span>Выделить ячейки, выбрать команду Макет --> Объединить ячейки</span>
2009₁₀ = 7·16² + 13·16¹ + 9·16° = 7D9₁₆
7D9₁₆ = 7·16² + 13·16¹ + 9·16° = (2² + 2¹ + 2°)·2⁸ + (2³ + 2² + 2°)·2⁴ + (2³ + 2°)·2° = 2¹° + 2⁹ + 2⁸ + 2⁷ + 2⁶ + 2⁴ + 2³ + 2° = 11111011001₂
11111011001₂ = 2¹° + 2⁹ + 2⁸ + 2⁷ + 2⁶ + 2⁴ + 2³ + 2° = 2·8³ + 8³ + 4·8² + 2·8² + 8² + 2·8¹ + 8¹ + 8⁰ = 3·8³ + 7·8² + 3·8¹ + 8⁰ = 3731₈
3731₈ = 3·8³ + 7·8² + 3·8¹ + 8⁰ = 1536 + 448 + 24 + 1 = 2009₁₀
1011101₂ + 1101110₂ = 11001011₂
Ответ 10. код проги на паскале ниже
program a2;
var i, x: integer;
begin
for i:= 1 to 100 do if (x div 10 = 0) or ((x div 10 mod 2 = 1) and (x >= 50)) then x:=x+1;
writeln(x);
end.
#include <iostream>
using namespace std;
int main()
{
int t;
long double n, s = 0, k = 1;
cin >> n >> t;
cout.precision(t);
while (k <= n)
{
s += 1 / (k * (k + 1));
k++;
}
cout << "Количество просуммированных элементов : " << n << endl;
cout << "Сумма : " << s << endl;
cout << "Разность суммы и 1 : " << (1 - s);
return 0;
}