1. В файле fact.in записано натуральное число (количество цифр от 1 до 200).Определить, является ли оно факториалом какого-либо числа. Если да, в файл fact.out записать это число (факториалом которого является исходное), если нет, то записать в этот файл слово “NO”. Пример: fact.in fact.out 6 3 7 no 2. Постфиксное выражение – это числовое выражение, в котором сначала записываются операнды, а затем знак операции. Например: 3 5 + означает 3+5. Особенностью постфиксных выражений является то, что при их записи скобки не нужны. Например, выражение (3+4*2)/3-1 можно записать так: 3 4 2 * + 3 / 1 -. Написать программу вычисления постфиксного выражения, содержащего цифры и знаки арифметических операций. Операнды и операции разделяются пробелами. Пример: post.in post.out 3 5 + 6 4 4 2 * + 3 / 1 - 3 3. Задан ряд последовательных натуральных чисел от n до m (n <m<1000000), из которого удаляют сначала все числа, стоящие на нечетных местах, затем из оставшегося ряда удаляют все числа стоящие на нечетных местах. Эти действия повторяют до тех пор пока не останется одно число, Определить это число. Пример: nchet.in post.out 5 10 8
Var i,o:text; n,k,res:integer; b:boolean; begin res:=1; b:=false; assign(i,'fact.in'); assign(o,'fact.out'); reset(i); rewrite(o); read(i,n); close(i); for k:=1 to n do begin r es:=res*k; if res=n then begin b:=true; write(o,'YES'); break; end; end; if b=false then write(o,'NO'); close(o); end.
