Определи основание системы счисления числа101101010²​

«alt+[shift]+tab» — переключение между окнами; «alt+f4» — закрыть активное окно; «alt+space (пробел)» — открытие системного меню окна. с него можно закрывать, сворачивать, разворачивать, перемещать и изменять размер окна без мыши; «alt+shift» или «ctrl+shift» — переключить язык; «ctrl+alt+delete» — открытие окна «безопасность windows»; «win» — открытие/закрытие меню «пуск»; «ctrl+esc» — открытие/закрытие меню «пуск»; «win+d» — свернуть/восстановить все окна, включая диалоговые; «win+e» — открытие программы «проводник»; «win+r» — открытие окна «запуск программы» («пуск» --> «выполнить…»); «win+f» — открытие окна для поиска; «win+l» — заблокировать компьютер; «win+m» — сворачивает все окна, кроме диалоговых; «win+pause/break» — открытие окна «система»; «ctrl+shift+esc» — открытие окна «диспетчер »; «print screen» — поместить снимок всего экрана в буфер обмена. в ms-dos использовалась для вывода на принтер содержимого экрана; «alt+print screen» — поместить снимок активного окна в буфер обмена;

program nm13; uses crt; var s1,s2,d,a,diag: real; beginwriteln('vvedi ploschad kruga i ploschad kvadrata'); readln(s1); readln(s2); d: =2*sqrt(s1/3.14); a: =sqrt(s2); diag: =2*sqrt(2*a*a); if diag> d then writeln (' krug pomestits9 v kvadrate ') else writeln (' krug ne pomestits9 v kvadrate ');

readln;

end.

8, 1, 4, 1, 5, 9, 6, 7, 2

var

n: integer;

begin

readln(n);

if (n mod 10)=(n div 100) then

writeln('палиндром')

else

writeln('не палиндром');

end.