Эй, ксапок, на твой Пост #215135 отвечу:
___

Задачи действительно детские, но их трудно решать на том же pascal / basic / C.

#1. Условие: Написать функцию которая будет возвращать факториал числа N (0<=N<=100).
Проблема: Обычно на олимпиадах есть два языка: C (C++) и Pascal. В последнем тип integer занимает два байта (2^16), а значит можно получить только факториал числа N < 12.
Все просто, если есть Python:Но сделаем функцию, которая будет складывать числа (в строках) методом столбика: Возможно, спасет longint (2^32), но я не проверял.


2#. Написать функцию "Сапер". В входном файле есть 2 числа М, N и матрица расположения бомб на карте. М и N - размерность матрицы. На выходе функция должна вывести на экран обработанную матрицу, на которой в каждой ячейке стоит цифра обозначающая количество рядом стоящих бомб. Пример:
Входной файл: 4
 4
 ....
 .*..
 *...
 ..*.Вывод на экран обработанной вашей функцией матрицы:1110
2*10
*321
12*1Проблема: Нет описания чисел M и N, поэтому читаем файл, определяем размеры, создаем массив, заполненный нулями. Снова читаем файл, получаем индексы "бомб", прибавляем единицы к индексам возле бомбы (ход короля, 9 клеток). Кстати, бобрософт тоже писал сапера =)

Открыть спойлер

Закрыть спойлер

Я еще не совсем освоился с Python, поэтому без былокода не обойтись:

[копировать] [скачать]

1. # Открываем файл на чтение
2. f = open("D:\\INPUT.TXT")
3. f.readline()
4. f.readline()
5.  
6. # Получаем кол-во столбцов и строк
7. n = 0
8. for line in f:
9.     m = len(line)
10.     n += 1
11.  
12. # Создаем двумерный массив
13. arr = []
14. for i in xrange(n):
15.     arr.append([])
16.     for j in xrange(m):
17.         arr[-1].append(0)
18.  
19. # Заново читаем файл
20. f.seek(0); f.readline(); f.readline();
21.  
22. k = 0; t = 0
23. for line in f:
24.     k = line.find('*', 0)
25.     while (k != -1):
26.         arr[t][k] = '*'
27.         # Немного быдлокода
28.         try:
29.             if k+1 != m: arr[t][k+1] += 1
30.         except: pass
31.         try:
32.             if k != 0: arr[t][k-1] += 1
33.         except: pass
34.         try:
35.             if t+1 != n: arr[t+1][k] += 1
36.         except: pass
37.         try:
38.             if t != 0: arr[t-1][k] += 1
39.         except: pass
40.         try:
41.             if (t+1 != n) and (k+1 != m): arr[t+1][k+1] += 1
42.         except: pass
43.         try:
44.             if (t+1 != n) and (k != 0): arr[t+1][k-1] += 1
45.         except: pass
46.         try:
47.             if (t != 0) and (k+1 != m): arr[t-1][k+1] += 1
48.         except: pass
49.         try:
50.             if (t != 0) and (k != 0): arr[t-1][k-1] += 1
51.         except: pass
52.         k = line.find('*', k+1)
53.     t += 1
54.  
55. # Записываем результат
56. file = open('D:\\OUTPUT.TXT', 'w')
57.  
58. for i in xrange(n):
59.     for k in xrange(m):
60.         file.write(str(arr[i][k]))
61.     file.write('\n')
62. file.close()

#3. Нужно написать функцию, параметром которой является входное число N (где N>0). Параметр должен постоянно обрабатываться по принципу:
• Если число N - парное, то делить его на два. (N=N/2)
• Если число N - не парное, то умножать его на три и прибавить единицу (N=N*3+1)
В итоге функция должна выводить количество действий, произведенных над числом N.

Ну, опять-таки, можно попробовать решать все с помощью Python'a, но Pascal нам мешает. Возьмем функцию sum(string s1, string s2) (выше) и сделаем другую div(string s), которая делит число на 2 (нацело). Что-то вроде этого:

Открыть спойлер

Закрыть спойлер

[копировать] [скачать]

1. def sum(s1, s2):
2.     result, m = "", 0
3.     if len(s2) > len(s1): s1, s2 = s2, s1
4.     for i in xrange(len(s1)):
5.         m = m + int(s1[len(s1) - 1 - i]) + (int(s2[len(s2) - 1 - i]) if len(s2) > i else 0)
6.         result, m = str(m % 10) + result, m / 10
7.     result = (str(m) if m > 0 else "") + result
8.     return result
9.  
10. def div(s):
11.     '''Деление числа на 2, нацело'''
12.     result, m, k = "", 0, 0
13.     while len(s) > 0 and not m > len(s):
14.         if m != 0: k = int(s[:m])
15.         else: m += 1; continue;
16.         if k == 1: m += 1; continue; #if k < 2 and k != 0
17.         result += str(k / 2); k = k % 2
18.         s, m = (str(k) if k != 0 else "") + s[m:], 0 if k == 0 else len(str(k))
19.     return result
20.  
21. def main(n):
22.     if type(n) != 'str': n = str(n)
23.     k = 0;
24.     while n != '1':
25.         if n[-1] == '0': n = div(n)
26.         elif n[-1] == '2': n = div(n)
27.         elif n[-1] == '4': n = div(n)
28.         elif n[-1] == '6': n = div(n)
29.         elif n[-1] == '8': n = div(n)
30.         else: n = sum(sum(sum(n, n), n), '1')
31.         k += 1
32.     print "Number:", k
33.  
34. main('99999999999999999999999999999999')

#4. В входном файле есть НАТУРАЛЬНОЕ число, которое может уместить в себе до 1000000 цифр. Нужно написать функцию, которая в этом огромном числе переставит одну цифру так, что выйдет число больше чем данное, но меньшее из всех возможных чисел больших данного.

Идея проста: было число 12800, стало 18200; было - 12801, стало 12810; 987645987 - 987647985. Для удобства, я написал функцию, которая возвращает последнее вхождение подстроки в строке:Выведет:18200  12801  98747985
#5. Последовательность P > 0 целых чисел называется jolly jumper, если абсолютные значения разностей последовательных элементов принимают все возможные значения от 1 до P - 1. К примеру, 1423 это jolly jumper, потому что абсолютные разности равны 3, 2 и 1 соответственно. Определение подразумевает, что любая последовательность из одного числа - это jolly jumper. Напишите программу, которая определяет, является ли каждая из введенных последовательностей jolly jumper. Входные данные: Каждая строка входных данных содержит число P < 3000, за которым следуют P целых чисел, представляющих собой последовательность. Выходные данные: Для каждой строки входных данных выведите строку, говорящую "Jolly" или "Not jolly"...

Читаем построчно файл, получаем числа, и просто проверяем результат:_______________


Для любителей говорить правильно: єто есть єлементарно.

XakepPRO, ну на бейскике точно запаристо

Прошу прощения, случайно перепутал числа Фибоначчи и факториал:Google подтверждает, что результат равен 100! = 9.33262154 × 101^57. Расчет занимает меньше доли секунды.

XakepPRO, на пятоне? О_О

Singularity, запросто. Я случайно забыл поставить условие выхода из цикла, так числа необыкновенные считает. Около.. 10^500..

Задача H. Необычный тир

Ограничение по времени: 1 секунда
Ограничение по памяти: 64 мегабайта

Друзья Антона пригласили поиграть его в необычный тир. Мишень представляет собой бумажный листок 1x1 метр, а снаряды – шарики с краской. Снаряд, попадая в мишень, взрывается и оставляет след в виде круга определѐнного радиуса. Часть круга может находиться вне мишени. Антон и его друзья по очереди стреляют
каждый в свою мишень, и после всех совершѐнных выстрелов смотрится, у кого из участников процент поражения максимален. Процент поражения — это отношение площади окрашенной зоны, к площади мишени. Антон совершил свои выстрелы. Вам нужно найти процент поражения.

Формат входных данных
На вход программе подается число N – число выстрелов (1≤N≤10). В следующих N строках находятся по три действительных числа x, y, r (0≤x,y,r≤1) – координаты точки попадания снаряда и радиус его поражения в метрах. Считается, что координата левого нижнего угла мишени — (0;0).

Формат выходных данных
Выведите единственное действительное число – процент поражения мишени. Ответ должен быть дан с точностью не менее одной десятой процента.

Примеры

Хотел бы спросить как прорисовать на екране ПРАВЕЛЬНЫЙ n угольник, формулу для вычитления следуйщей точки подкинте, и код, желательно на java or pascal

Maxxxl123, завтра этим займусь.

Задача E. Не упадѐт!

Ограничение по времени: 1 секунда
Ограничение по памяти: 64 мегабайта

Антон играет в игру «Не упадѐт!». В этой игре нужно строить башню из кубиков и цилиндров. Антон заметил, что если ставить хотя бы 2 цилиндра друг на друга, то башенка неминуемо падает, а во всех других случаях — держится. У Антона есть неограниченное количество кубиков и цилиндров — помогите ему узнать, сколько различных устойчивых башенок высоты H он сможет построить.

Maxxxl123, в правильном N-угольнике каждый угол отстоит от другого на (360 / N) градусов (например для квадрата, это 90 градусов). Чтобы найти точку нужно длину (радиус) умножить на косинус (для x) или синус (для y) угла. Вот код на паскале.