Найти N-й член последовательности 1, 2, 4, 5, 10, 100, 101, 202, 40804, 40805,...

начало программы;  объявление переменных n,a,b,c числа типа Double; начал; вывод :введите число - n-й элемент последовательности; ввод :число n; b приравниваем к 1; цикл пока a не равно n делать    если a не равно n то начало: b = b * 2;  a:=a+1; конец;   если если a не равно n то начало: b:=b*b; a:=a+1; конец;    если если a не равно n то начало: b:=b+1; a:=a+1; конец; конец цикла; вывод : число находящееся на месте n месте ==> d; конец программы.