Программирование

Язык программирования Pascal

Pascal — универсальный язык программирования, позволяющий решать самые разнообразные задачи обработки информации.

СОЗДАТЕЛЬ: НИКЛАУС ВИРТ

РАЗРАБОТАН В 1971 г.

НАЗВАН В ЧЕСТЬ ФРАНЦУЗСКОГО УЧЕНОГО

БЛЕЗА ПАСКАЛЯ

В состав интегрированной среды входят:

• Текстовый редактор
• Компилятор (переводит программу целиком, а затем выполняет её).
• Отладчик
• Справочная система
• Среда выполнения программы

Среда программирования Turbo Pascal

Имя файла

Закрывающая кнопка

Номер окна

Кнопка масштабирования

Номер редактируемой строки

Полосы прокрутки

Номер позиции в строке

Компиляция программы

После того как текст программы набран, его следует перевести в машинный код. Для этого программу отправляют на компиляцию , выбрав из главного меню - меню Compile пункт Compile (или Alt+F9 ).

Запуск программы

Для того чтобы запустить программу , из главного меню выбираем меню Run и в вертикальном меню выбираем пункт Run (или Ctrl+F9 ) . После этого появляется окно, в котором осуществляется диалог с программой.

Линейный алгоритм

Program ;

Var : ;

Begin

Команда 1;

Команда 2;

…

Команда N

End.

Запись математических выражений

Математическая запись

Строчная запись

SQRT(x+2)

x 2

SQR(x)

(2 – x) / (y + 5)

Задача 1

Даны два целых числа. Найти произведение этих чисел.

Наберем текст первой программы, вычисляющей произведение двух целых чисел:

Program p1;

Var a,b,с: integer;

Begin

WriteLn ('Введите два целых числа через пробел');

ReadLn (a,b);

с:=a*b;

WriteLn ('Их произведение равно: ', с);

ReadLn;

End.

Program ;

Var : ;

Begin

Команда 1;

Команда 2;

…

Команда N

End.

Задача 2

Найти площадь поверхности куба со стороной a .

Дано: a

S = 6a 2

Найти: S

Program Plochadkuba;

Var a, S : integer;

Begin

WriteLn ('Введите сторону куба');

ReadLn (a);

S:= 6 *sqr(a);

WriteLn (‘Площадь равна: ', S);

ReadLn;

Write (‘площадь=‘, S);

End.

a

Program ;

Var : ;

Begin

Команда 1;

Команда 2;

…

Команда N

End.

Задача 3

Даны три числа. Найти среднеарифметическое трех чисел.

Program ;

Var : ;

Begin

Команда 1;

Команда 2;

…

Команда N

End.

Задача 4

Вычислить выражение: с = а 2 + в 2

Program ;

Var : ;

Begin

Команда 1;

Команда 2;

…

Команда N

End.

Задача 5

Вычислить периметр и площадь прямоугольного треугольника по длинам двух катетов а и в .

Program ;

Var : ;

Begin

Команда 1;

Команда 2;

…

Команда N

End.

Задача 6

Составьте алгоритм вычисления выражения: y=2x+b, при x+5, b=5

Program ;

Var : ;

Begin

Команда 1;

Команда 2;

…

Команда N

End.

ДОМАШНЕЕ ЗАДАНИЕ

ВЗЯТЬ ИЗ УЧЕБНИКА МАТЕМАТИКИ

5

АРИФМЕТИЧЕСКИХ ВЫРАЖЕНИЙ И СОСТАВИТЬ

ЛИНЕЙНЫЕ АЛГОРИТМЫ ДЛЯ ИХ ВЫЧИСЛЕНИЯ,

А ТАКЖЕ НАПИСАТЬ ПРОГРАММУ НА ЯЗЫКЕ

ПРОГРАММИРОВАНИЯ ПАСКАЛЬ