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, поляезна вспомним таб. умножения )))...
 
Ответить с цитированием
 



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Подставка для дисков "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