ANTICHAT.XYZ    VIDEO.ANTICHAT.XYZ    НОВЫЕ СООБЩЕНИЯ    ФОРУМ  
Баннер 1   Баннер 2
Antichat снова доступен.
Форум Antichat (Античат) возвращается и снова открыт для пользователей. Здесь обсуждаются безопасность, программирование, технологии и многое другое. Сообщество снова собирается вместе.
Новый адрес: forum.antichat.xyz
Вернуться   Форум АНТИЧАТ > Программирование > PHP, PERL, MySQL, JavaScript
   
Ответ
 
Опции темы Поиск в этой теме Опции просмотра

Pascal для новичка
  #1  
Старый 08.03.2006, 17:00
Аватар для Micr0b
Micr0b
Участник форума
Регистрация: 14.01.2006
Сообщений: 242
Провел на форуме:
2630617

Репутация: 245
Отправить сообщение для Micr0b с помощью ICQ
По умолчанию Pascal для новичка

Ето язык есть первим шагом для начинающего программиста, в школе я сначало учил
Алго ето чтото типа Паскаля, но намного проще, через год Паскаль...
Ну ето другая история. В етой теме я б хотел написать несколько команд(операторов)
каторые могут чемто помочь новичку.
Ета стаття ничем увивит хорошего программиста, ))
Я себя им не считаю )

Так приступим к изучению:

Program <Name> - начало нашей прграмы Name, имя програмы.

var - вот ето переменых (переменая ето a,b,c,i,wer...) переменым можно
присваивать числа n..5..-1 до +1..7..n и '0' также. Пример а:=5, где 'а' -начальное
значения имело '0', а потом присвоетса число 5, вы спросите меня чо такое ':'-
ето знак присвоения...


integet - Целые типы чисел (-32768..32767), в пример 'var a,b:integer;'ето
значит то чо переменые 'a' i 'b' не должны перевышать даные типы чисел.
real - Реальные типы чисел (2,9*10 -39), так само с 'real'.

begin - начало кода нашей программы (иногда используют как операторные дужки).
end;- ето конец операторных дужек.
end. -а вот етот скрипт конец программы.
write(ln) - оператор выводу текста, результата... Пример Write('nash text');
Вы спросите зачем 'ln' ето чото типа ентера пример writeln('nash text');.
read(ln) - оператор вводу или как можна ищо сказать присваевания 'x' число -..+
Пример read(a);.
randomize - ето тан казываемой geNeRaToR_Chisel )) ето нужно написать после бегина
а использувать 'a:=random(10)', 1..10 генерирует.



Есть ищо много... ето не всьо, я надеюсь я кого то етим заинтересовал )))
Множеста разно инфы валяетса в нете ищи в стандартном google.com.ua ).

А к Теме додам 2-прогы чтоб можно было увидить как ето смотрится ))) с далека ).


Program generator_chisel;
var
a:integer;
begin
randomize;
a:=random(10000);
writeln('Genereto chisel=', a);
read(a);{етот код призначен для вводу,но он здесь нужен для задержкы окна, можно Ctrl+c}
END.


Program kalculator;
var
a,b,c:integer;
begin
randomize;
a:=random(10);
b:=random(10);
write(a,'*',b,'=');
read(c);
if a*b=c then writeln('Cool ')
else writeln('You lol, ERROR');
read(c);{етот код призначен для вводу,но он здесь нужен для задержкы окна, можно Ctrl+c}
END.

Чо скажыте прога kalculator, поляезна вспомним таб. умножения )))...
 
Ответить с цитированием

  #2  
Старый 08.03.2006, 18:39
Аватар для TheFile
TheFile
Познающий
Регистрация: 09.08.2005
Сообщений: 97
Провел на форуме:
221491

Репутация: 12
По умолчанию

да парень.... необьяснил, что куда где скачать, сразу к делу, а мож вообще незнаю что такое паскаль, и чё... мне в Ослике искать Program <Name> - начало нашей прграмы Name, имя програмы???
 
Ответить с цитированием

  #3  
Старый 08.03.2006, 19:05
Аватар для tclover
tclover
Banned
Регистрация: 13.12.2005
Сообщений: 1,091
Провел на форуме:
9751364

Репутация: 1847


По умолчанию

Каккой ещё паскаль??? Ты же русский не выучил!
 
Ответить с цитированием

  #4  
Старый 08.03.2006, 20:34
Аватар для TTyck
TTyck
Участник форума
Регистрация: 13.11.2005
Сообщений: 199
Провел на форуме:
824195

Репутация: 75
Отправить сообщение для TTyck с помощью ICQ
По умолчанию

Да ладно, пацаны, малой стараеца....
 
Ответить с цитированием

  #5  
Старый 08.03.2006, 20:45
Аватар для A110ut
A110ut
Постоянный
Регистрация: 31.12.2005
Сообщений: 605
Провел на форуме:
4349433

Репутация: 661


По умолчанию

))) Trampled рулит))))
 
Ответить с цитированием

  #6  
Старый 08.03.2006, 21:57
Аватар для nerezus
nerezus
Pagan Heart
Регистрация: 12.08.2004
Сообщений: 3,791
Провел на форуме:
6490435

Репутация: 2290


Отправить сообщение для nerezus с помощью ICQ
По умолчанию

Цитата:
Да ладно, пацаны, малой стараеца....
немцы вон тоже в 40х годах старались, ты их тоже тогда бы молодцами назвал?
 
Ответить с цитированием

  #7  
Старый 08.03.2006, 22:14
Аватар для Vandal
Vandal
Участник форума
Регистрация: 11.03.2005
Сообщений: 269
Провел на форуме:
1024281

Репутация: 23
Отправить сообщение для Vandal с помощью Yahoo
По умолчанию

Пскаль . Но до него был qbasic /
Несколько примеров , так для поддержания темы .


Операторы .
CLS -
Screen
input
print
end
sleep

1)

Cls - служит для очистки экрана .
Нужни писать в самом начале программы .

2 ) Screen - Это выбор режима . Если будем работать с цыфрами то по дефолту стоит screen 0 / Если будем рисаовать точки и линии то нужно написать screen 9

3) Input /. ввод данных . тоже несколько значений .

4) Print вывод данных на экран .

Пример .

CLS
PRINT "Antichat.ru"


Что бы цвет изменить


cls
color 15, 2 (Изменится цвет фона и шрифта .)
print "Antichat.ru"







5) end - пишется в конце программы

6) sleep / задержка . Есть вещи которыекомп делает очень быстро и что бы эти действия заметить нужна задержка .

Так же можно использовать sound 30000,10

Для запуска программы надо нажать шифт + ф5
 
Ответить с цитированием

  #8  
Старый 09.03.2006, 12:35
Аватар для cnd
cnd
Познающий
Регистрация: 07.03.2006
Сообщений: 50
Провел на форуме:
821143

Репутация: 109
Отправить сообщение для cnd с помощью ICQ
По умолчанию

Чувак на самом деле "Отчаяный", а вы жжоте =)
 
Ответить с цитированием

  #9  
Старый 09.03.2006, 13:49
Аватар для Dronga
Dronga
ВАША реклама ТУТ!!
Регистрация: 01.07.2005
Сообщений: 647
Провел на форуме:
3478464

Репутация: 714


Отправить сообщение для Dronga с помощью ICQ
По умолчанию

Да перестаньте вы чтоли! Нормальная, а главное нужная тема, которая будет востребована! нет разницы на чем начать кодить, главное уловить эту сиситему и паскаль на мой взгляд не худший вариант. Я поставил человеку + за нужную, полезную тему. Может быть человек неправильно её начал раскрывать, но давайте поможем ему! Зачем срать?

Вспомните, сколько раз мы видели, с чего мне наать хакинг?? Вот пускай отсюда и начаинают.

Устанавливаем Borland Pascal 7.0 и можем приступать... У кого стоит Delphi, так же этот код может быть откомпилирован и в этой среде, надо лишь создавать проект как консольное приложение.

Вопрос к автору, лично меня всегда мучало =) Паскаль хотя и имеет четко прописанные ограничение для всех числовых типов перменных, но если ты например будешь выходить за обявленные в хелпе рамки range, то компилятор никаких ошибок не выдаёт.
__________________
My ICQ: 296@463@859 ONLY!! Please check your list!!
И здесь могла бы быть ВАША реклама!!!

Последний раз редактировалось Dronga; 09.03.2006 в 13:53..
 
Ответить с цитированием

  #10  
Старый 09.03.2006, 17:05
Аватар для gadjet
gadjet
Познающий
Регистрация: 17.12.2005
Сообщений: 78
Провел на форуме:
464418

Репутация: 23
По умолчанию

Не, это не дело. Щас рулят объектно-ориентированные языки, типа делфи. Щас я напишу статью "Бейсик для новичка". Во интересно то будет...
 
Ответить с цитированием
Ответ



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Подставка для дисков "CD-Бидон" своими руками dinar_007 Аппаратное обеспечение 5 27.01.2008 18:47
Как настроить ICQ и e-mail на мобильнике novichok Схемы и программы 9 07.06.2006 22:50
какОй трой ИСпоЛЬзоваТЬ длЯ поЛНого УПРАвЛЕиЕ уд.КОМПОМ? UnKn0wN E-Mail 32 08.04.2006 04:20
Мобилография - это серьезно novichok Сотовый фрикинг 1 06.03.2006 15:31
Перепрошивка Bios видеокарт ~Fenix~ Чужие Статьи 4 05.03.2006 23:08



Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
 


Быстрый переход




ANTICHAT.XYZ