PDA

Просмотр полной версии : Языг праграмиравания "ПРЕВЕД"!


Тарифы: МТС, Билайн, МегаФон
Выгодные непубличные тарифы МТС, Билайн, МегаФон, Безлимитный интернет ✅
083
11-08-2006, 19:21
Языг праграмиравания "ПРЕВЕД"!
УРОК Первый!
сигхтнагниз этава языга очен похожо
на языг Прогхрамиравания "Поскаль"
любая пограмма начинаицо с ключевого слова ПРЕВЕД, посли чиго
следуит имя этай программы.
Премер:
ПРЕВЕД первыйнах;
канец каманды или блока нах обязательна раздиляица точкай с запятой..
вот так тоись ;
канец кпрограммы всигда заканчиваица словом
МЕДВЕД
операторгными сгобками являицо слова
НАЧЕЛ
пох здеся будит программа
КОНЧЕЛ ;
Кгстати есливы заметили, то злово пох являица
обозгначением комминтария строки..
тоись строка "здеся будит программа" работать нибудит!
кстати если вы хатите за похкомментировать несколька строг
то для этава нужна испольгсавать следующую конгструкцию
нахиирявсеэтанаписал
{
этад кодт не будит выполнен..
}
основныи типы данных:
переменные объявляюца после ключевога слова типа
преведстрока - строковый типа
преведчисло - числовой в диапазоне -2147483648..2147483647
преведчислосточкай - число с плавующей точкай.(8 байт)
преведчислошопестец - ниибаца какой диапазон –2^63..2^63–1
преведмедвед - уникальный типа данных - может принимать значения либого типа
преведилинед - логический типа.. может принимать значения... угу и неа
опираторы
арифметико:
+ - / *
логико:
и(and), или(or), нех(not)
логическии когстанты угу и неа
фунгции в праграмме обозначаюца ключивым словом кагдила
далее в сгобках перечисляюца парраметры.. а потом угказываица тип этой фунгции..
вощем вот ее конгструкция
кагдила [Название функции] (параметр:типа;...): типа данных;
Премер:
кагдила Учаснег(кагзовуд: преведстрока ; скокалед: преведчисло ): преведилинед;
результат функнуции - возвращица оператором взад
параметры могут быть тагжи и выходными, для этага нада тожи поставить взад на
против
имини переменаай.
кстати
нах - обозгначаит 0, он жи nil, он жи null.
логика:
"если aka (if)" абазначаица камандой
вдруг вощим ща пакажу пример
вдруг Учаснег = "hchru" потом
начел
пох тудможно чтота напесать.
кончел
нихрина
начел
пох авот туд если учаснег нихрена не hchru
кончел;
каг видна па примеру если еще ключевые слава потом
и
нихрина
ну нахир ани нужны вы ужи сами догодались...
циклы:
абазначаюца ключевым словом жжги
вощим разбирайтесь сами
приведу токо премер:
кагдила премерцикла(скокаих: переведчисло ): переведчисло
типа
кросавчег: перведчисло ;
мой_медвед: перведчисло ; пох мой_медвед иначи программа закончица...
начел
жжги кросавчег=1 да 10 поехали
начел
мой_медвед = мой_медвед + скокаих * кросавчег;
пох вот такой вотцигл
кончел ;
взад мой_медвед;
кончел ;
вощим Урог первый закончен нах... Читайте мануал короче ламеры..
и я говорю заведтнаи слово о закрытии программы МЕДВЕД

_A_M_
11-08-2006, 19:25
смяЖно ) ...

083
11-08-2006, 19:25
<lj-cut text="Раскрытие темы">
//
// Превед.cpp : Defines the entry point for the console application.
//

#include <iostream>
#include <locale.h>

//------------------------------------------------------------------
// The PREVED Language Kernel area. Do not touch! :)

#if !defined (_MSC_VER) || _MSC_VER < 1400
#error Wrong compiler! Use MSVS 8.0
#endif

#define НАЧЕЛ {
#define КОНЧЕЛ;}
#define ТИПА int
#define ВДРУГ if (
#define ТАДА )
#define НИХРИНА else
#define ВЗАД return
#define КАГДИЛА (
#define ЙО;
#define ЖЖОШ(p,n) for (; (p) <= (n); (p)++)

#define БАЗАР std::cout <<
#define СЛЫШЬ <<
#define СТОЙ system ("echo. & pause");
#define БЛИН _wsetlocale (LC_ALL, L"Russian_Russia.ACP");

#define ВРОДЕ try
#define ****УЦЦО throw
#define АПСТЕНУ catch (const char* __чё__)

#define ПРЕВЕД ТИПА main КАГДИЛА ТАДА
#define МЕДВЕД ВЗАД 0; КОНЧЕЛ

// End of area
//------------------------------------------------------------------

ТИПА КРУТО КАГДИЛА ТИПА фигня ТАДА
НАЧЕЛ
БАЗАР "ВАЩЕ " ЙО
ВДРУГ фигня == 8 ТАДА ****УЦЦО "мля! " ЙО
ВЗАД 0
КОНЧЕЛ

ПРЕВЕД
НАЧЕЛ
БЛИН

ВРОДЕ НАЧЕЛ

ТИПА фишка = 0 ЙО

ЖЖОШ (фишка, 10)
НАЧЕЛ
БАЗАР фишка СЛЫШЬ " ";
ВДРУГ фишка >= 5 ТАДА КРУТО (фишка) ЙО
КОНЧЕЛ

КОНЧЕЛ АПСТЕНУ НАЧЕЛ
БАЗАР "****УЦЦО invoked: " СЛЫШЬ __чё__;
КОНЧЕЛ

СТОЙ
МЕДВЕД</lj-cut>