Есть ответ 👍

Составьте программу, проверяющую, есть ли в слове x повторяющиеся буквы

155
324
Посмотреть ответы 2

Ответы на вопрос:


Program al; var s: string; i: integer; begin writeln('vvedite slovo '); readln(s); for i : = 1 to length(s)  do if s[i]=s[1]   then writeln(' v slove esti povtoriaiusciesia bukvi') else writeln(   ' v slove net povtoriaiusciehsia bukv ' ); readln; end.
megadog
4,7(68 оценок)

Объяснение:

16бит=2байта

2мб=2048кб

1гб=1024мбит

6байт=48 бит

1кб=1024 байт

100байт=800бит

64 бита=8 байтов

0.5кб=512 байт

Популярно: Информатика