У Анахорет есть телеграм - https://tgme.pro/anahoretcomics

Сегодня ты отмечаешь свой день рождения! В этот день ещё родились писатель Василь Быков, физик Блез Паскаль, который рвал бочки кружками, а так же изобретатель текстильной застежки-липучки Жорж де Местраль! Желаю тебе жить так, чтоб ничего не прилипало и у тебя всегда были силы на то, чтобы выдержать любое давление! С днём!

я в телеграме

ссылка для тех, кто хочет поддержать мой ежедневный проект

Изучая Пикабу и его обитателей, задумался о том, что могли бы сказать великие мыслители прошлого о феномене Пикабу? Вот несколько мыслей Блеза Паскаля, которые, ИМХО, можно соотнести с этим популярным развлекательным ресурсом.

Почему люди заводят себе аккаунт на Пикабу?

Удел человеческий: переменчивость, скука, тревога, гордыня, тщеславие, зависимость, жажда независимости, нужда.

Мы слабы, смертны, и так несчастны, что для нас нет утешения ни в чем, если мы задумаемся о нашем уделе всерьез.

Единственное благо людей состоит в развлечении от мыслей о своем уделе; это может быть какое-нибудь занятие, сбивающее мысли на другой путь, или какая-либо новая приятная страсть, их заполняющая, или игра, охота, увлекательное зрелище - одним словом, все, что зовется развлечением.

Не уводит ли пребывание на Пикабу от истины?

Нет несчастья хуже того, когда человек начинает бояться истины, чтобы она не обличила его. Кто не любит истину, тот отворачивается от нее под предлогом, что она оспорима. Гнусные те люди, которые знают, в чем истина, но стоят за нее, лишь пока им это выгодно, а потом отстраняются. В наши времена, когда истина скрыта столькими покровами, а обман прочно укоренился, распознать истину может лишь тот, кто горячо ее любит.

Что же должен знать пикабушник?

Нужно знать самого себя. Пусть это не поможет найти истину, но поможет хотя бы правильно устроить свою жизнь, а это самое благое дело. Величие человека в том, что он осознает свое ничтожество. Он ничтожен, потому что такова его участь; но он велик, потому что это сознает. Человек - всего лишь тростинка, самая слабая в природе, но это тростинка мыслящая. Есть 2 крайности: исключить разум, допускать только разум. Мы познаем истину не только разумом, но и сердцем. Высшее проявление разума - признать, что есть бесконечное множество вещей, его превосходящих. Без такого признания он просто слаб. Так что же есть человек в природе? Ничто по сравнению с бесконечностью, все по сравнению с небытием.

На Пикабу многие издеваются над философией и философами...

Издеваться над философией, это значит - поистине философствовать.

Данная статья относится к Категории: ОРГ научной деятельности

«В 17 лет, желая помочь отцу в громоздких вычислительных операциях, связанных со сборам податей в Руанском генеральстве, интендантом которого был отец, Паскаль задумал создать счётную машину. Облегчение счёта путём его автоматизации было не только его личной задачей, а одной из актуальных научных проблем XVII столетия. […] Путь этот был тернистым, потребовавшим от Паскаля не только больших творческих усилий, но и огромного волевого и физического напряжения, а также значительных материальных затрат, на которые, кстати, не скупился его понимающий отец. […]

Созданию счётной машины Паскаль отдал 5 лет своей хрупкой и короткой жизни. Он вложил в неё все свои знания по математике, механике, физике, талант изобретателя, природную сноровку мастера. По замыслу Блеза, счётная машина-сумматор должна была облегчить сложные расчёты «без пера и жетона» любому человеку, не знакомому с математикой. В теоретическом плане принцип её действия довольно прост: автоматический перенос десятков с помощью вращательного движения зубчатых колес, замена десятков нулём в одном разряде и автоматическое прибавление единицы в следующем. Но для низкой техники того времени реализация этого простого замысла была сопряжена с невероятными трудностями, через которые пришлось пройти Паскалю.

Одну из первых готовых машин Паскаль с благодарственным посвящением подарил канцлеру Сегье, который в трудный момент поддержал пошатнувшиеся надежды юного изобретателя, «Кровавый палач» народа Сегье был покровителем наук и страстным собирателем редких книг и рукописей.

В 1649 г. канцлер добился от короля «Привилегии на арифметическую машину» для Паскаля, согласно которой за автором закреплялось право на приоритет, её изготовление и продажу.  Некоторое время Паскаль занимался производством счётных машин и какое-то количество из них продал; посредником в деле сбыта машин был Роберваль, друг обоих Паскалей. Но кустарная техника того времени делала производство машины очень сложным и

дорогостоящим предприятием, которое не могло долго продержаться на личных средствах и героических усилиях изобретателя. Тем более что, тяжёлый труд на протяжении 5 лет подорвал и без того хрупкое здоровье Паскаля. Его начали мучить изнурительные головные боли, которые давали о себе знать всю последующую жизнь».

Стрельцова Г.Я., Паскаль и европейская культура, М., «Республика», 1994 г., с. 34-35.

Историки считают, что у Блеза Паскаля было до 50 вариантов счетной машины.

Источник — портал VIKENT.RU

Дополнительные материалы

Ранняя гениальность Блеза Паскаля

Изображения в статье

Счётная машина Паскаля, Автор: David.Monniaux, CC BY-SA 3.0

Паскаль, изучающий циклоиду, Лувр, Автор: Огюстен Пажу - Jastrow (2006), Общественное достояние

Автор: Rechka

Program random5;;

var

a:Integer;

begin

randomize;

a:= random(101);

if a <= 10 then  // 1

Writeln(1); 

if (a <= 20) and (a > 10) then // 2

Writeln(2);

if (a <= 30) and (a > 20) then // 3

Writeln(3);

if (a <= 40) and (a > 30) then // 4

Writeln(4);

if (a <= 50) and (a > 40) then // 5

Writeln(5);

if (a <= 60) and (a > 50) then // 6

Writeln(6);

if (a <= 70) and (a > 60) then // 7

Writeln(7);

if (a <= 80) and (a > 70) then // 8

Writeln(8);

if (a <= 90) and (a > 80) then // 9

Writeln(9);

if (a <= 100) and (a > 90) then // 10

Writeln(10);

end.

Как это работает?

Переменной "a" присваивается случайное число от 1 до 100

в условиях указан диапазон, чем он больше тем больше вероятность срабатывание оператора. но не так всё просто. Ниже я объясню как изменять вероятность

чтобы изменить вероятность, нужно изменить два числа

if a <= __ then // 1

Writeln(1);

if (a <= 20) and (a > __) then // 2

Как правильно рассчитать и вписать цифры?

Формула для 1

if (a <= z)

Z=X

Формула для  от 2 до 10

if (a <= z ) and (...)

if (a <= E) and (a > F)

пусть X задания вероятность

формулы:

E=X+Z

F=Z

например вероятность выпада "2" должна быть равна 25%

по формуле

X=25%

E=25+10=35

F=10

if a <= 10 then  // 1

Writeln(1);

if (a <= 35) and (a > 10) then // 2

Но сумма всех вероятностей (X ) должна равна 100%

например: вероятность выпада "4" должна равна 20% а выпада "5" 5%

будет выглядеть так:

if a <= 10 then // 1

Writeln(1);

if (a <= 20) and (a > 10) then // вероятность 10%

Writeln(2);

if (a <= 30) and (a > 20) then // вероятность 10%

Writeln(3);

if (a <= 50) and (a > 30) then // вероятность 20%

Writeln(4);

if (a <= 65) and (a > 50) then // вероятность 5%

Writeln(5);

if (a <= 75) and (a > 65) then // вероятность 10%

Writeln(6);

Можно добавлять больше вариантов, просто добавьте такой блок после последнего оператора

if (a <= E) and (a > F) then

Writeln(?);

За место "E" и "F" запишите цифры по формуле, которая была выше.