Примеры:

Среда разработки программ Pascal ABCNET  скачать программу

	Язык Паскаль был разработан профессором Николаусом Виртом из Швейцарского города Цюрих в 1970 году. Название язык получил в честь французского математика 17 века Блеза Паскаля, изобретателя механической вычислительной машины (арифмометр).    Удобен для первоначального обучения основам программирования.
Система PascalABC.NET  – это язык Delphi (Object Pascal) для платформы Microsoft .NET, содержащий все основные элементы современных языков.

Язык Pascal

---

Алфавит языка называется множество символов, с помощью которых строятся все конструкции (объекты) языка. ТУРБО ПАСКАЛЬ включает следующий набор основных символов:

---

---

Для дальнейшего изучения языка воспользуйтесь встроенной в среду PascalABC.NET собственной справки, написано хорошо. НИЖЕ ПРИВЕДЕНЫ СПРАВОЧНЫЕ МАТЕРИАЛЫ

---

 
 Математические функции

---

Это функции, реализующие стандартные математические функции, обычно с одним аргументом. Как аргумент, так и результат имеют числовой тип (целочисленный или вещественный). Ниже приведены имена, типы и назначения стандартных математических функций.

---

Арифметическое выражения

---

Арифметическое выражения - это символьная запись, составленная из чисел, имен переменных и элементов массивов, стандартных функций, знаков арифметических операций, круглых скобок и имеющая смысл с точки зрения математики.

---

Арифметическое выражение задает правило вычисления числового значения. При записи арифметического выражения необходимо придерживаться следующего правила:
1. Все символы выражения записываются в одну строку. "Многоэтажные" выражения, верхние и нижние индексы запрещены.
2. Два знака арифметических операций не должны располагаться рядом. Знак умножения опускать нельзя.
3. Операции равного приоритета выполняются по порядку слева на право. Исключением является операция возведения в степень: порядок выполнения справа на лево.

---

Алгоритмы, составленные только из структуры следования, называются: ЛИНЕЙНЫМИ АЛГОРИТМАМИ.
БАЗОВАЯ СТРУКТУРА СЛЕДОВАНИЯ образуется из последовательности действий, следующих одно за другим.

---

1-й этап.
ПОСТАНОВКА ЗАДАЧИ:
1. Что дано? 2. Что требуется? 3. Какие данные допустимы? 4. Какие результаты будут правильными, а какие нет?
На данном этапе строится описательная информационная модель объекта или процесса.

- Сначала условие формулируется на обычном языке, - Затем производится точная постановка задачи, - Далее следует собственно решение задачи,

Задача. Самолёт летит со скоростью 900 км/ч. Выполняет разворот с креном 30 гр. Вычислить радиус разворота. Постановка задачи: Дано: V=900км/ч - скорость самолёта k=30 - градусов g=9,8 м/сек2 - ускорение свободного падения Требуется найти: R=? (в метрах)

---

2-й этап.
РАЗРАБОТКА МАТЕМАТИЧЕСКОЙ МОДЕЛИ

---

Математическая модель - это математические соотношения, связующие результаты с исходными данными

---

Анализ математической модели: 1. Все переменные V, k, R - физические величины дробного типа, 2. V - необходимо перевести в м/сек2 (V/3,6) 3. tg( k) - аргумент тригонометрической функции в градусах - переводим в радианы (k*Pi/180), результат R=? в метрах, 4. Определить порядок выполнения арифметических операций, 5. Исключительная ситуация - числитель не равняется нулю (делить на ноль нельзя)

---

3-й этап.
КОНСТРУИРОВАНИЯ АЛГОРИТМА

---

АЛГОРИТМ - конечная последовательность указаний, адресованных исполнителю, четко и однозначно задающая процесс решения задач какого-либо типа во всех деталях и позволяющая получить за конечное число шагов результат, однозначно определяемый исходными данными.  //ПРОПУЩУ см. тему алгоритмизация)//

---

4-й этап.
ПЕРЕВОД АЛГОРИТМА В ПРОГРАММУ
program radius;
var v,k,r:real;
const g=9.8;
begin
Write('v=');Read(v);
Write('k=');Read(k);
r:=sqr(v/3.6)/(g*tan(k*pi/180));
WriteLn('OTVET: R=',r:0:4);
end.                                                                      скачать исходник  (с комментариями)

---

5-й этап.
КОМПЬЮТЕРНЫЙ ЭКСПЕРИМЕНТ
1. запуск выбранной среды программирования; 2. набор текста программы; 3. сохранение этого текста на диске; 4. запуск программы на выполнение.

---

6-й этап.
АНАЛИЗ ПОЛУЧЕННЫХ РЕЗУЛЬТАТОВ
Состоит в анализе получаемых результатов и корректировке исследуемой модели.

Задача 2.
   К предыдущей задаче (Самолёт летит со скоростью 900 км/ч. Выполняет разворот с креном 30 гр. Вычислить радиус разворота.) добавим ограничения. Скорость вводимая с клавиатуры должна быть больше 300 км/ч.
   Воспользуемся условным оператором (см. справку PascalABC.NET операторы - условный оператор). Также дополнительно воспользуемся оператором безусловного перехода goto (метка) с использованием метки label

---

Команду алгоритма, написанную на языке программирования, принято называть ОПЕРАТОРОМ.

---

ПРОГРАММА (листинг) - это последовательность команд (операторов).

---

ЛИСТИНГ ПРОГРАММЫ
program radius;
var v,k,r:real;
const g=9.8;
label a1;
 begin
 a1: Write('v=');Read(v);
 if v<=300 then
 begin
Writeln('Ведите скорость > 300км/ч');
goto a1;
end
else
Write('k=');Read(k);
r:=sqr(v/3.6)/(g*tan(k*pi/180)); 
WriteLn('OTVET: R=',r:0:4);
 end.                                                           скачать исходник  (с комментариями)