//Pascal ABC.NET v3.1 сборка 1172
Var
a:real;
begin
readln(a);
if a>0 then writeln('Положительное, ',a/2) else
if a<0 then writeln('Отрицательное, ',sqr(a)) else
writeln('0');
end.
Пример ввода:
-12
Пример вывода:
-, 144
def is_palindrome(string):
reversed_string = string[::-1]
if reversed_string==string:
print('Палидром - ' + string)
else:
print('не, не палидром - '+string)
oo=[]
for i in range(3):
oo.append(str(input()))
for i in oo:
is_palindrome(i)
криво, но пойдет