- •Содержание
- •Теория о Паскале…………………………………………………………….3
- •Блог – схема программы……………………………………………………10
- •Текст программы……………………………………………………………11
- •Теория о Паскале Паскаль, Блез
- •Филипп де Шампень.
- •Частная коллекция Жиродон, Giraudon, собственность компании fpg International, l.L.C.
- •Важнейшие открытия и изобретения
- •Арифмометр — механическая счетная машина
- •Закон Паскаля и атмос ферное давление
- •Теория вероятностей и рулетка
- •"Мысли"
- •О человеке
- •Об обществе
- •Текст программы
О человеке
Чем умнее человек, тем больше своеобразия находит он во всяком, с кем общается. Для человека заурядного все люди на одно лицо
Привычка — вторая натура, которая разрушает первую3
Любопытство — вид тщеславия. Часто люди приобретают знания, чтоб потом ими хвастаться
Нужно знать самого себя. Пусть это не поможет найти истину, но поможет хотя бы правильно устроить свою жизнь, а это самое хорошее дело
Король окружен людьми, занятыми только тем, как его развлечь и помешать ему думать о самом себе. Ибо какой бы он ни был великий король, стоит ему задуматься — и он несчастен
Человек — всего лишь тростинка, самая слабая в природе, но это тростинка мыслящая. Пусть Вселенная и раздавит его, человек все равно будет выше своего убийцы, так как он знает, что умирает, а Вселенная ничего не знает
Наша природа — движение, полный покой — это смерть
Об обществе
Люди презирают религию. Они испытывают ненависть и страх при мысли, что она может оказаться истинной
Слава так сладка, что пусть ее принесет хоть смерть — мы все равно ее любим
Щегольство — не такое уж пустое дело; это значит доказывать, что на тебя работает множество людей
Людей не учат достойному поведению и учат всему остальному. А они хотят знать то единственное, чему их не учат
Нас радует борьба, но не победа. Интересно смотреть на схватку зверей, а не на победителя, терзающего жертву
Если бы люди знали, что они говорят друг о друге, на свете не нашлось бы и четырех друзей
Если знаешь главную страсть человека, не сомневайся, что ему понравишься
Принуждение молчать — самое страшное из гонений
Текст программы
CREATE
PROCEDURE Inc
reasePrices
( Percent2Increase DOUBLE PRECISION)
RETURNS (ID INTEGER, NAME VARCHAR(80),
new_price DOUBLE PRECISION) AS
DECLARE VARIABLE avg_price DOUBLE PRECISION;
BEGIN
SELECT AVG(Price_1)
FROM Table_Example
INTO :avg_price;
FOR
SELECT ID, NAME, PRICE_1
FROM Table_Example
INTO :ID, :NAME, :new_price
DO
BEGIN
IF (new_pnce > avg_price) THEN
BEGIN
new_price = (avg_price + avg_price*(Percent2lncrease/100));
UPDATE Table_example
SET PRICE_1 = :new_price
WHERE ID = :ID;
END
ELSE
BEGIN
new_price = (new_price + ((avg_price - new_price)/2));
UPDATE Table_example
SET PRICE_1 = :new_price
WHERE ID = :ID;
END
SUSPEND;
END
