// PascalABC.NET
// Версия 3.3.5 сборка 1662 (29.04.2018)
А
begin
Println('Кол-во символов -',ReadString('Слово->').Length)
end.
Пример:
741258963
Кол-во символов - 9
Б
begin
var s:=ReadString('Слово-> ').ToLower;
Println(s[1]=s[s.Length]?'Совпадают':'Не совпадают');
end.
Пример:
Слово-> Олово
Совпадают
В
begin
var s:=ReadString('Слово-> ');
Println(s[1],s[2],s[s.Length]);
end.
Пример:
Слово-> Плотина
П л а
Г
begin
Println(ReadString('Слово->').Length mod 2=0?'Четно':'Нечетно');
end.
Пример:
Слово-> Виноград
Четно
Поделитесь своими знаниями, ответьте на вопрос:
Для передачи секретного сообщения используется код, состоящий только из русских букв (всего используется 30 различных символов При этом все символы кодируются одним и тем же (минимально возможным) количеством битов. Определи информационный объём сообщения длиной в 320 символов.
Импликация — бинарная логическая связка, по своему применению приближенная к союзам «если… то…».
Импликация записывается как посылка следствие; применяются также стрелки другой формы и направленные в другую сторону (остриё всегда указывает на следствие).
Суждение, выражаемое импликацией, выражается также следующими
Посылка является условием, достаточным для выполнения следствия; Следствие является условием, необходимым для истинности посылки. x={"Студент сдаст хорошо сессию"} y={"Папа купит ему машину"}. Однако, это не совсем удачная иллюстрация, потому что как-то не очень близка к действительности. Напомню, что x->y == 0 только в том случае, если студент действительно хорошо сдал сессию, а папа машину ему не купил (наоборот, если студент сдал плохо, а папа купил ему машину, то папу лжецом уж точно не назовёшь).