@DancingWolf: *работа *смехуёчки *факап

топ 100 блогов DancingWolf — 23.07.2010 >ФУНКЦИЯ fact(i):integer;
>{
> ЕСЛИ (i > 1) ТО
> result := i* (fact (i-1))
> ИНАЧЕ
> result := 1;
>};
>K := ВВОД('Введите число','1');
>ВЫВОД('%d! = %d',k,fact(k));

Спасибо за приведенный пример при обращении и написании функций,
но данная функция работает некорректно в случае если result:= любое
значение отличное от 1 в структуре ИНАЧЕ.
Просьба исправить или сообщить почему это происходит.

Оставить комментарий

Архив записей в блогах:
Утро туманное, утро седое — нет! И глядят уныло голые кусты — нет! Продолжаем жить не позитиве, не увязывая смену времен года с настроением. Ну, и музычку для настроения! С ...
"16 апреля около 18.30 на бульваре Гусева в районе д. 16 г. Твери девушка (16-17 лет), двигаясь на велосипеде по тротуару, сбила 78-летнюю женщину. Велосипедистка, постояв рядом с пострадавшей несколько секунд, ушла с места происшествия, помощь пострадавшей оказывали прохожие. С ...
Предварительный эскиз будущего ракетного катера ВМС Украины Несколько дней назад командующий Военно-морскими силами Украины контр-адмирал Алексей Неижпапа провел встречи с военными атташе стран Североатлантического Альянса. В понедельник он общался с атташе ...
Край березовый, необъятный... Художник Синев Евгений. Березки Березовая роща Озерцо в березовой роще [B]Край березовый, необъятный[/B] Запах терпкой ромашки и мяты, В пышногрудых кудрявых степях. Край березовый, необъятный, Что так крепко полынью пропах. Упаду, ...
Дерьмократия левых. Они сделали с Мариной Лё Пен то, чего леваки Америки чуть не сделали с Трампом.  Она бы в 27 году жалкого Макрошу соплёй перешибла на выборах. ...