НАДО
КАК ЕЕ ЗАПИСАТЬ?
напишите программу ,которая выполняет подсчет согласных букв в слове
ВОТ ПРИМЕР КАК ДЕЛАТЬ,НО ЭТО ПОДСЧЕТ С РАЗЛИЧНЫХ БУКВ В СЛОВЕ
136
163
Ответы на вопрос:
ответ:{ Составить программу подсчета различных букв в слове. }
var s:string;
r:real;
i,j,n:integer;
begin
r:=0;
readln(s);
for i:=1 to length(s) do begin
n:=0;
for j:=1 to length(s) do begin
if s[i]=s[j] then inc(n);
end;
r:=r+1/n;
end;
writeln('количество различных букв = ', r:1:0);
end.
Объяснение:
Просто каждый байт перевести в двоичную систему счисления, получится: 10010011.11100110.10011111.000 11001, это и есть ответ(если посчитать то тут 32 цифры)
Популярно: Информатика
-
blrikiog16.07.2020 19:58
-
dashabar120805.07.2020 16:02
-
zaharooow11.08.2021 21:20
-
TolstoyLev24.12.2022 09:40
-
valera21210517.03.2022 02:51
-
polina20041204.03.2023 22:38
-
botuchenyy27.04.2023 22:39
-
klevchuk71p06srz25.06.2020 12:53
-
annamacsimava0809.04.2022 19:05
-
nikitkaapalkov10.05.2023 19:05