Ctrl - V
- Rama
- Модератор
- Сообщения: 1143
- Зарегистрирован: 28.03.2008
- Благодарил (а): 389 раз
- Поблагодарили: 240 раз
- Контактная информация:
Код: Выделить всё
Программа z1;
использует математику;
уаг я: число;
с, х, р: расширенный;
начать
ReadLn (х),
S: = 0;
я: = 1;
в то время как истинные делать
начинают
р: = мощность (х, 2 * я) / (2 * я),
если р <0,0001, то разрыв
еще
начинаются с: = с + р;
я: = я + 1;
конец,
конец;
WriteLn (я, '', а ',', р);
конца.
gunsgunsguns
- Force
- Модератор
- Сообщения: 3396
- Зарегистрирован: 20.01.2011
- Откуда: de Côte d’Ivoire
- Благодарил (а): 83 раза
- Поблагодарили: 391 раз
- Контактная информация:
Техподдержка русская, не? Как думаешь прокатит, если один из ключей, которых скинул крыса-кун для б2к я скину в тех поддерку, и буду гнуть линию Я ЕГО КУПИЛ, А ОН ИСПОЛЬЗОВАН. МЕНЯ НЕ ЕБЕТ, ДЕЛАЙТЕ ЧТОБ РАБОТАЛО.
Costa Concordia