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, так же если ввести не двухзначное число или буквы, то программа ничего не выведет.
Program lol;
var i:integer;
sum,kv:real;
begin
for i := a to b do
begin
kv = i*i;
sum:=sum+kv;
kv:=0;
end;
end.
<span>Если понравилось решение - нажимай "спасибо" и "лучший" (рядом с кнопкой "спасибо") :)</span>
1) (А или В)и((А или неВ)=(А и А) или (А и В) или ((А и (неВ))или((В и (неВ))=А или А и В или (А и неВ)=А(1 или В) или (А и неВ)=А или (А и неВ)=А(1 или неВ)=А
2) по закону де Моргана =не (неХ) и не(неУ)=Х и У =ХУ