Varn, nine, one: integer;
begin
readln(n);
nine := 0;
one := 0;
while (n > 0) do
begin
if (n mod 10 = 1) then
inc(one)
else
if (n mod 10 = 9) then
inc(nine);n := n div 10;
end;
if (one = nine) then
writeln('Равны')
else
if (one > nine) then
writeln('Единиц больше')
else
writeln('Девяток больше');
<span>end.</span>
#include "stdafx.h"
#include <iostream>
using namespace std;
int main(int argc, char* argv[])
{
cout << "obrabotka massiva" << endl;
int array1[16] = { 5, -12, -12, 9, 10, 0, -9,
-12, -1, 23, 65, 64, 11, 43, 39, -15 };
cout << "indeks" << "\t\t" << "element massiva" << endl;
for (int counter = 0; counter < 16; counter++)
{
cout << "array1[" << counter << "]" << "\t\t" << array1[counter] << endl;
}
system("pause");
return 0;
}
1 байт=8 бит
1Кбайт=1024байт
1Мбайт=1024Кбайт
1Гбайт=1024Мбайт
Вес твоего сообщения 61 байт. 61*8=488битов
343 (8сс) = 11 100 011 (2сс)
Ответ: пиктограммы (11 букв)