Loading...
Начнём с первой задачи. Кое-как написал расчёт факториала, а вот дальше не знаю что делать. Как правильно эту формулу записать в виде, пригодном для паскаля?
%%Прикладываю сам код:
program ex1_v1;
var factorial: longint; y:real; i,n:integer;
begin
writeln ('введите n'); read(n);
if (n=0) then writeln('0!=1') else
if (n<0) then writeln('Определяется только для положительных чисел') else
factorial:=1;
for i:=2 to n do
factorial := factorial * i;
y:=0; i:=i+1;
for i:=0 to n do y:=(n+(i+1)/(1/factorial));
writeln ('y = ',y);
end.
Может, он уже всё правильно считает, а я только зря ебусь?
Алсо, вот это
if (n=0) then writeln('0!=1') else
if (n<0) then writeln('Определяется только для положительных чисел') else
factorial:=1;
for i:=2 to n do
factorial := factorial * i; скопипиздил с какого-то сайта. Что там за условие, и почему i присваиваются 2 раза разные значения не понимаю. Может, кто-нибудь объяснит.
Бампецкий.
Хуйня твой паскаль, решай матлабом, питоном
Так что, апельсинус, правильно моё чудовище считает?
>>58706826 Лучше всего в математике
>>58707033
Математика это читерство, ОП же погромирует тут
>>58706688
Еще проверь, чтоб число было натуральным.
>>58707005
какой мудак зажание составлял лил. этож (n - i - 1)/n!
>>58706582
Ты же кроме n еще и i вводишь, чини.
Алсо, вот примерно так должен выглядить код после
>for i:=2 to n
do
begin
factorial := factorial * i;
xyi:=xyi+1/factorial;
end
>>58707005
голову то включи: у тебя n! под дробью как ты получил результат больше единицы? и тем более 725
>>58707350
не нужен второй цикл, проще упростить эту хуйню алшебраически чем процессор грузить
>>58706407
В пять строчек на языке программирования
factorial n = product [1..n]
firstTask n = sum $ map ((1/) . factorial) [1..n]
secondTask n x = product $ map ((x+2)^) [1..n]
division i = (i+3)/i
thirdTask n = sum $ map division [2..n]
>>58707481
Дай угадаю: ассесблерщик?
>>58707872
Ассемблерщик*
Если кто-то считает в первой задачи напрямую факториалы - ссы им в глазницы. За такое надо на пересдачу отправлять будущих погроммистов.
Ёбаный школьник, пиздуй спать, говно ты тупорылое. Задачу он решить не может, охуеть. Ты гандон ёбаный просто, у тебя мозга нет, вот тебе ответ на задачу.
>>58707803
Опять хаскеллеёб припёрся.
>>58708224
Ну я не илитный хаскелеёб. Илитный написал бы это через катаморфизм и анаморфизм, а мне лень.
>>58708146
Хуй соси
@
Губой тряси
>>58706407
Дропай это говно, оп. Паскаль не нужен.
double s, a;
//input i0 and N
a = fact(i0);
for(int i = i0 + 1; i < N; ++i)
{
a *= i;
s += 1/a;
}
>>58708315
Забыл добавить, что изначально s = 1./a;
>>58708280
Как будто он, блядь, учит паскаль для того, чтобы всю жизнь потом на нём писать.
Всегда обсираюсь с таких петушков-паскалененавистников.
>>58708278
Обосрался
@
Молчи
>>58706582
>i:=i+1
>2013
>>58708474
Ну я тоже пердолился с паскалем раньше, и что? Нахуй он нужен? Почему бы не начать с каого-нибудь другого ЯП?
>>58708539
Начинай с хаскеля тогда. Вон, у нас есть тут уже один.
А я задам тебе встречный вопрос. Почему бы не начать с простого и логичного паскаля? Потому что паскальнинужен!!!!1?
>>58708530
И чё? Псевдоилитарию припекло?
>>58708581
Потому что он нигде не используется. Или нет нынче широко распространенных простых и логичных языков?
>>58708581
Потому что он дико невыразительный. Даже сишка выразительнее.
>>58706688
>i присваиваются 2 раза разные значения
Наркоман штоле сука?
>>58708625
Да какая, блядь, разница, используется ли классический паскаль? И у современных языков свои области применения. Он позволяет освоить основы программирования и прочей хуйни типа типизации и работы с файлами, при этом не разжижая мозги и не забивая их навороченной хуитой.
Я не говорю, что паспаль онли должен использоваться в обучении. Я говорю, что в нём нет ничего плохого и он кашу не портит.
А потом, когда в голове появится немного мозгов, учи серьёзные ЯП на здоровье. Честно, мне кажется, что ты переоцениваешь мыслительные способности многих падаванов
>>58708756
Нормальные языки тоже это позволяют. И при этом не забивают голову мусором который не пригодится
>>58708851
Интересно, где в паскале мусор.
Дай пример "нормального" языка, пожалуйста. Любопытно взглянуть хоть я и предвижу твой ответ. Это будет всего навсего тот язык, который тебе больше нравится
>>58708530
А ты в курсе, что не все компиляторы/трансляторы могут в операцию инкремента/декремента. Так что лучше перестраховаться иной раз
>>58709110
Тем не менее, инкремент экономичнее, этого не отнять. Смущает только упоминание о годе.
Как будто, блядь, 10 лет назад люди знать не знали про инкремент.
>>58708940
Я пишу на многих языках. Каждой задаче свой инструмент. Паскаль некуда применять. А без применения все забудется быстро. Бессмысленная трата времени. Нормальный язык-ну хотя бы жава и питон, хотя я их не люблю, мало свободы дают.
>>58708615
Если ты псевдоилитарий - да.
Осло
factorial:=n;
repeat
dec(n);
factorial:=factorial*n;
until n=1
- минимум хуеты, минимум движений.
Не длагодари.
>>58709170
>нормальный язык
>жава
Да как же ты не уложишь в своей голове, что паскаль изучается (если уж изучается) не ради того, чтобы писать потом всё на паскале. Рассуждаешь как кодер, ей богу. Циклиться на языке программирования - пиздец. Просто с паскаля легче стартануть. И то, я вовсе не говорю, что это истина непреложная. Просто это работает.
>>58709269
И? Ты считаешь, что это может кого-то впечатлить?
Вы охуели, суки. Пол-треда не могут написать вычисление факториала. Ёбаный стыд. Просуммировал, блядь, числа от n до 1. Молодец, теперь я верю, что ты не имбецил.
>>58709271
Инкрементирую адеквата.
Паскаль научит в контроль типов, процедурное и функциональное, научит как делать низя, а дальше путь лабает на чем хочет.
>>58709271
Легче? Кто сказал? Тупой синтаксис, малое комюнити, про возможности вообще молчу. По сути будешь переизобретать велосипеды вместо того чтобы впитать готовый опыт языков которые доказали право на использование.
Зы: тоже начинал с паскаля.
>>58709408
Посылаю в направлении си шарпа
>>58709472
>тупой синтаксис
Это не аргумент технаря.
Комьюнити на хуй себе наверни и сливками помажь. Третий раз повторять тебе, для чего паскаль может использоваться в обучении не буду. Какое нахуй комьюнити? Ты что, блядь, ПО на паскале пилить собрался, рукоблуд несчастный? Синтаксис паскаля учится за один день по методичке. Всё, что есть в паскале из возможностей - правильно с точки зрения изучения железки и прививания хорошего тона. Вот и все тебе дела, маня.
>>58709329
Ты так кукарекаешь, будто я нечаянно тебе в жопу хуй засунул.
Что с тобой?
>>58709515
Оттуда и шлю телеграммы.
>>58709607
Ну и чего там в паскале лучше? Шарп для обучения мозга шикарен. Типизация (если она так нужна), ооп, фп, аоп, асинхронность просто сказка. И в быту можно применить
>>58709855
Тут уже вопрос того, в какую сторону уклон. Если ты кодер - можешь и в шарп пиздовать.
Если жестянщик, паскаль для начала ничуть не хуже твоих шарпеев.
>>58706582
>if (n=0) then writeln('0!=1') else
>if (n<0) then writeln('Определяется только для положительных чисел') else
> factorial:=1;
И в этом месте внезапно завершается IF. А значит, все, что дальше будет выполняться даже при отрицательном аргументе
>y:=0; i:=i+1;
Зачем теребить i, если она в начале цикла обнулится энивей?
>for i:=0 to n do y:=(n+(i+1)/(1/factorial));
>>58709953
Разное у нас понятие. Для меня кодер тоткто просто кодирует решение задачи. Мне ближе те кто умеет в архитектуру, дизайн, абстракции, гибкие решения. То есть всякие тдд, solid, паттерны всякие, mvc/p, mvvm, то есть то что дает возможность растить по,а не написал и забыл. Плюс смешение парадигм чтобы юзать другую паадигму если она более подходит а не лепитьвезде любимый подход
>>58710156
Кк, ты программер. Ты вертишься в высокоуровневых вещах, твои предпочтения понятны и вполне правильны.
>>58710200
>кодер тоткто просто кодирует решение задачи
Да, так оно и есть, здесь я с тобой согласен.
>>58710156
У меня от твоих аргументов ЗОЛОТОЙ МОЛОТОК
Аноны, извините что немного не по теме, но все же, кто разбирается, решите пожалуйста задачу.
Теория вероятности
>>58710398
А ты ленивая сука и пидор.
Мат. ожидание и дисперсия гуглятся за 0.1 секунды.
А считаются за одну минуту.
ПРОГРАММЕР>КОДЕР>ГОВНО>ХУЙ=ОП
>>58710032
А чтоб такой еботы не было, используй силу, люк:
repeat
write('Введи натуральное число: '); read(n)
until ((n>0)and(n=trunc(n)));
{дальше вычисления}
Смысл таков: зачем юзать условные, да еще и вложенные, когда нам нужно только контроль ввода? При этом самый пиздецовый моветон в >>58706582 - пихать рабочую часть в ветку else.
Все потому, что логика программы не продумана.
А потом такие погромисты устраиваются на госпредприятия чтоб спасать бухгалтерам файлы из корзин, да бумагу в принтере застрявшую доставать.
>>58709170
Задача Паскаля - не его практическое применение в будущем, а формирование логического мышления, с помощью которого юный кодер и будет дрочить явы и питоны.
Бумпуст.
Двощец, решаю сейчас задачи в паскале, пикрилейтед. В этом ИТТ треде буду разбираться с ними.