Question

Составить программу.
Дано 3-х значное число.Равны ли его 1-я и 3-я цифра?

Answer 1

Program p1; 

Var a: string; 

Begin 
Writeln('Введите трёхзначное число'); 
Read(a); 

If Integer.Parse(a[1])=Integer.Parse(a[3]) then 
Writeln('Равны') 
Else 
Writeln('Не равны'); 
End.