"Основы программирования на языке Паскаль"
Язык Паскаля При записи программы на языке программирования можно пользоваться лишь символами, предусмотренными алфавитом языка. Алфавит языка Паскаль составляют буквы, цифры и специальные символы (знаки операций и ограничители). Специальный символ может быть одной литерой или парой литерой. В последующем изложении будем использовать: заглавные буквы латинского и русского алфавитов :A B C D E F G H I J K L M N O P Q R S T U V W X Y Z А Б В Г Д Е Ё Ж З И Й К Л М Н О П Р С Т У Ф Х Ц Ч Ш Щ Ы Ь Э Ю Я арабские цифры : знаки операций : + - * / = = : = ограничители :., : ; ' ( ) [ ] ^
Целые типы Названи е Длина, байт Диапазон значений Byte Word Integer LongInt Вещественные типы Real (Диапазон десятичного порядка )
Алгоритмические операции: Операция ДействиеТип операндаТип результата + Сложение Integer, real - Вычитание Integer, real * Умножение Integer, real / Деление Integer, realreal DIV Деление (целое число) Integer MOD Остаток от деления Integer
Стандартные алгоритмические функции: Операция ДействиеТип операнда Тип результата Sin(x) Sin x любойreal Cos(x) Cos x любойreal Arctan(x)arctg xлюбойreal Ln(x) Ln x любойreal Sqrt(x)любойreal Sqr(x) х2х2 любой
Стандартные алгоритмические функции: Операция ДействиеТип операнда Тип результата Abs(x) Модуль от х любойЛюбой Int(x) Возвращает целую часть х, не выполняя преобразований real Randor(x) Случайное число целого типа от 0 до Х Integer x n =exp(n*ln(x))
Основная структура программы. Правила языка Паскаль предусматривают единую для всех программ форму основной структуры: Program ; Begin End.
Определение типа данных Var a:integer; b:real; Var a, b :integer;
Оператор ввода данных Read (F); Readln (F); Read (F,V1,V2,Vn);
Оператор вывода данных Write (F); Writeln (F=; F); writeln ('Введите целое число:'); write ('x1=',x1,'x2=',x2); Write (F,X1, X2,Xn);
Для иллюстрации введённых понятий рассмотрим программу, реализующую тривиальный алгоритм сложения двух произвольных действительных чисел и печати результата: Program SUMMA; Var A, B, C : Real; Begin Read(A,B); C := A + B; Writeln('C=',C) End.
Задача: Найти площадь прямоугольника. Program pr1; Var a, b :real; Begin write (введите а=); readln(a); write (введите в=); readln(a); S:=a*b; Writeln ( s=; s) End.