InFlame

Рейтинг
150
Регистрация
12.09.2008

Хорошая штука HDR. Вот только не представляю как её можно толком автоматизировать в 2D.

**Удалено**

могу подсказать
в необединичивании переменной a

Я как только эту программу не вертел.. А всё оказалось так просто :)

Спасибо :)

Разобрался

Аналогичная по принципу задачка, если найдёте ошибку - мегареспектище вам :)

Найти n! для всех n<(или равно)15 делящихся нацело на 3.

Program Progr_vloj_vi4_prots;

var i,n: byte;

a,del: integer;

BEGIN

Writeln('Факториал какого числа будем искать?');

Writeln('(Введите его и нажмите ENTER)');

Readln(i);

Writeln('Кратно чему??');

Readln(del);

a:=1;

For i:=1 to i do

Begin

If (i mod del)=0

Then

For n:=1 to i do

a:=a*n;

If (i mod del)=0

Then

Writeln('Для n=',i,', n!=', a);

End;

END.

Выполняется. По сути всё должно быть правильно.. Всё проверил несколько раз, а вычислять правильно не хочет.

3. Те, кто считает, что я поступаю не правильно, и дизайнер всегда прав - идут лесом...Тогда рисуйте для себя.

Дизайнер должен рисовать для посетителя, а не для Вас.

PS

Все дизайнеры мне в редиску залепили ? :)

а если по делу то, уж то, что вы сделали веб дизайном не назвать, хотите со мной поспорить? гоу в ICQ 462006290!

Плакал над вами :)

Я не хочу с вами спорить. Доказывать вам.. Время только зря убивать.

К таким людям давно привык ;)

уверен?
ну тут же ничего не выполнено, небольшие доработки и все, даже 1 бакса не стоит...

Люди на форуме в Веб-дизайне не разбираются.

О чём я и говорил. :)

Как вам ? ;)

Жду отзывы :)

Я уже видеть стал как Джон Неш :D

У меня картинка есть 🙄. И в цитате моего сообщения тоже картинка есть.

Вот залил ещё раз:

Видно ? ;)

jpg 24738.jpg
Всего: 681