1. Английский эквивалент терминов, изученных в данной теме кодирован по базовой таблице ASCI (таблица - id1428623220210616 от SophiakoSheleva5666 16.06.2021 17:22

Question

Информатика: 1. Английский эквивалент терминов, изученных в данной теме кодирован по базовой таблице ASCI (таблица 2). Расшифруй слова и найди их перевод на русский и казахский языки. Слово 1 01110100 01100101 01111001 01000010 Слово 2 01110010 0111 01100001 01000010 01101001 01101110 Слово 3 01101101 01100010 01100101 01001110 01110101 011 Слово 4 01000011 01101111 01100100 01100101​

SophiakoSheleva5666 · Accepted Answer

Var Sim:array[0..10] of string; function count_ya(var s: string): integer; begin   var i, n, len: integer;   var c: char;     n := 0;   len := Length(s);   for i := 1 to len do begin     c := s[i];     if (c = я ) or (c = Я ) then begin       n := n + 1;     end;   end;     result := n; end; procedure word(var s: string); begin   var i, c, k, j: integer;     c := count_ya(s);     for i := 0 to 10 do begin     if count_ya(Sim[i]) c then begin       for k := 9 downto i do begin         Sim[k + 1]...

MOGZ ответил