М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
MinecraftAndSchool
MinecraftAndSchool
18.09.2020 06:59 •  Информатика

1. Сложите числа и переведите результат в десятиро сектору
а) 101 101, и
1110111,
б) 101 101, и 1010
в) 1011101, и 101011,
г) 101, и 101
д) 101, и 1111
е) 101111. и 1011
ж.) 10111101. и 111,
3) 101, и 1001,
2. Выполните вычитание и результат переведите в десятичную
11011)
б) 1001,
1010
101011,
г) 111101, - 1101
е) 101, - 1010
3) 101,
1101001,
1. Выполните умножение и результат переведите в десятичную
систему счислення:
а) 1011, 101,
6) 101, 1010,
в) 10101,
10101,
г) 101, 101,
д) 101, 11.
е) 1011, 101
ж) 10101,
2) 101, 1001,
4. Выполните действия в двоичной системе смиссия
а) 10101, + 1010111-
6) 101001, - S601
в) 10001, + 635
r) 10657 - 1101
110111, + 100
c) 1001 10010
5. Персислите числа из двоеной системы сессия в асоси
тую в восьмеригую системы счисле
а) 101010101;
6) 100001010: а) tilicot;
г) 1000010;
д) 111001010
а) tooli011;
li) | 100001;
ж

👇
Открыть все ответы
Ответ:
grigorisinnatal
grigorisinnatal
18.09.2020

11010000 10011000 11010000 10111101 11010001 10000100 11010000 10111110 11010001 10000000 11010000 10111100 11010000 10110000 11010001 10000110 11010000 10111000 11010001 10001111 00001101 00001010 11010000 10011010 11010000 10111000 11010001 10000001 11010000 10111011 11010000 10111110 11010001 10000000 11010000 10111110 11010000 10110100 00100000 11010001 10000001 11010000 10111110 11010000 10110010 11010001 10000000 11010000 10110101 11010000 10111100 11010000 10110101 11010000 10111101 11010000 10111101 11010000 10111110 11010000 10110011 11010000 10111110 00100000 11010000 10111100 11010000 10111000 11010001 10000000 11010000 10110000

4,8(57 оценок)
Ответ:
Yoss12
Yoss12
18.09.2020
Var s,st: string;
    a: array[1..255] of integer;
    i: integer;    
begin
  write('строка: ');  readln(s);
  for i:=1 to 255 do a[i]:=0;
  for i:=1 to length(s) do inc(a[ord(s[i])]);
  st:='';
  for i:=1 to length(s) do
    if ((a[ord(s[i])]>=2) and
       (s[i] in ['а'..'я']))  then continue
    else st:=st+s[i];
  writeln('новая строка: ',st);
end.

строка: Это строка для проверки.
новая строка: Э са для пвеи.

Если нужно, чтобы не различались прописные и строчные буквы, то другой вариант программы:

var s: string;
    a: array[1..255] of integer;
    i,j: integer;    
begin
  write('строка: ');  readln(s);
  for i:=1 to 255 do a[i]:=0;
  for i:=1 to length(s) do
  if ord(s[i])>32 then
  begin
    inc(a[ord(s[i])]);
    if s[i] in ['а'..'я'] then inc(a[ord(UpperCase(s[i]))])
    else if s[i] in ['А'..'Я'] then inc(a[ord(LowerCase(s[i]))]);
  end;  
  j:=0;
  for i:=1 to length(s) do
  if (a[ord(s[i])]>=2) then continue
  else 
  begin
    inc(j);
    s[j]:=s[i];
  end;  
  delete(s,j+1,length(s)-j);
  writeln('новая строка: ',s);
end.
4,5(95 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ