Написано и протестировано в PascalABC.NET (версия 2.2, сборка 842) const s='велосипедист'; var t:='кытунак'; p:string; begin // 1 Writeln(LeftStr(s,9),', ', s[12]+s[2]+s[5]+s[12]+s[4],', ', s[4]+Copy(s,3,2)+s[1]+s[4]); // 2 Writeln('Позиция буквы "д" в слове "'+s+'" равна ',s.IndexOf('д')+1); // 3 Write('Было: ',t,', стало: '); t[2]:='о'; t[4]:='е'; t:=t.Replace('а','о'); Writeln(t); // 4 Write('Коды символов слова ',t,': '); foreach c:char in t do Write(Ord(c),' '); Writeln; // 5 Write('В слове ',t,' количество букв '); if Odd(t.Length) then Writeln('нечетное') else Writeln('четное') end.
Результат выполнения программы: велосипед, тесто, олово Позиция буквы "д" в слове "велосипедист" равна 9 Было: кытунак, стало: котенок Коды символов слова котенок: 234 238 242 229 237 238 234 В слове котенок количество букв нечетное
gre4ka2004
02.01.2022
Клавиатура, джойстик, сканер, (принтер - устройство вывода) Монитор, графопостроитель, принтер, (мышь - устройство ввода). Жёсткий диск, flash-память, компакт-диск, (процессор - не элемент памяти) . Принтер, акустические колонки, наушники, (микрофон - устройство ввода). (Системный блок - обобщенное), центральный процессор, оперативная память, жёсткий диск, блок питания. Системный блок, клавиатура, мышь, монитор, (акустические колонки - не обязательны). Видеокарта, (карта расширения, звуковая карта, сетевая карта. Enter, (End - др. функциональное назначение), Esc, Delete. (Цветовой принтер - не существует), лазерный принтер, матричный принтер, струйный принтер
слова, которые нужно удалить - в скобках, и пояснения, почему так
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос:
Первый файл имеет информационный объем 65 байт, второй -880 бит.каков общий объем в байтах этих двух файлов?
880/8=11байт
65+11=76 байт