// PascalABC.NET 3.3.5, сборка 1636 от 10.03.2018
// Внимание! Если программа не работает, обновите версию!
begin
var s1:=ReadLnString('1: ');
var s2:=ReadLnString('2: ');
s1.ToLower.Intersect(s2.ToLower).OrderBy(t->t).Println(',')
end.
a = input()
if (len(a) == 2) and (a.isdigit()):
b = int(a)//10 + int(a)%10
print(b*b)
P.s программа работает так - вводим 66, она выведет 144, т.к (6+6)^2 = 144, так же если ввести не двухзначное число или буквы, то программа ничего не выведет.
Выбирать из чего? Прикрепи фото
Управляет процессами обработки машинного кода, проиводит логические операции, выполняет арифметические операции