Ответы на вопрос:
Так как нам нужно обнаружить один из трёх символов, воспользуемся в условии логическим оператором or.
var st: string;
n, k: integer;
begin
writeln('Введите текст');
readln(st);
n := length(st);
k := 1;
for var i := 1 to n do
begin
if (st[i] = '.') or (st[i] = '?') or (st[i] = '!') then
k := k + 1;
end;
writeln('В тексте ', k, ' предложения(-ий)');
end.
Если алфавит состоит из четырех букв, то обозначая их коды числами от 0 до 3, мы сможем разместить любой символ в двух битах (2² = 4). тогда строка из 10 символов займет 10х2 = 20 бит. страница из 8 строк займет 8х20 бит = 20 байт (в байте 8 бит). а текст из трех страниц займет 3х20 = 60 байт.
Популярно: Информатика
-
ZheniaBabich26.07.2020 13:56
-
yaooiojhh08.03.2020 10:14
-
4chanus13.05.2022 01:37
-
котикДжеек09.04.2022 01:30
-
delacourr29.10.2020 13:45
-
aselznala200418.12.2021 00:33
-
Makc92009.01.2023 09:56
-
Diana10200429.06.2023 20:39
-
Sanshooos03.02.2020 15:50
-
ksyushaivleva27.02.2023 08:30