close

Вход

Забыли?

вход по аккаунту

?

Краткий справочник по Pasсal

код для вставкиСкачать
Справочные материалы по языку Pascal
Общая структура программы
Заголовок программы
program
имя
;
program task01;
Объявление констант
const
имя =
значение
;
const g = 9.81;
Объявление переменных
var
имена :
тип
;
имена :
тип
;
var t, s: real;
i, k: integer;
Алгоритм
begin
операторы
end.
begin
write('t = ');
readln(t);
writeln('S = ', g*t*t/2:6:2);
. . . end.
Некоторые типы данных
Название
Обозначение
Возможные значения
Целые
integer, longint
целое число
Вещественные
real, single, double,
extended
действительное число
Символьный
char
символ
Логический (булев)
boolean
false | true
Строка
string
string [длина]
строка (до 255 символов)
строка (до заданной длины)
Массив
array [диапазон] of тип пронумерованная последовательность
элементов заданного типа
Операции
арифметические операции
операции сравнения
логические операции
+
сложение
<
меньше
and
«и» (конъюнкция)
-
вычитание
>
больше
or
«или» (дизъюнкция)
*
умножение
= равно
not
«не» (отрицание)
/
деление
<>
не равно
div
деление нацело
<=
меньше либо равно
mod
остаток от деления
>=
больше либо равно
Некоторые функции
abs(x) ∣
x
∣
модуль
length(s)
длина строки
sqr(x)
x
2
квадрат
concat(s1,s2...)
слияние строк
sqrt(x)
x
квадратный корень
copy(s,i,n)
фрагмент строки (n символов,
начиная с i)
sin(x)
sin x
синус
*
cos(x)
cos x
косинус
*
chr(n)
символ с кодом n
round(x)
округление
ord(c)
код символа
trunc(x)
целая часть
random(x)
случайное число
*
Аргумент тригонометрических функций выражается в радианах (
π
рад = 180°)
Некоторые операторы
Присваивание
переменная := выражение;
d := b*b-4*a*c;
Переменная d получает значение, равное
результату заданного выражения
Ввод
read(переменные);
read(a, b, c);
Компьютер ожидает ввода с клавиатуры
значений переменных a, b и c
readln(переменные);
readln(x);
Компьютер ожидает ввода с клавиатуры
значения переменной x, после чего переводит
строку
Вывод
write(выражения);
write('a=', a);
На экран выводится текст «a=» и значение
переменной a
writeln(выражения);
writeln(a+b);
На экран выводится результат вычисления
выражения a + b
Условный оператор
if условие then
begin
операторы
end
else
begin
операторы
end;
if d >= 0 then
begin
x1:=(-b-sd)/(2*a);
x2:=(-b+sd)/(2*a);
writeln(x1, x2);
end
else
writeln('Корней нет');
Если переменная d больше либо равна нулю,
выполняются вычисления x1 и x2 и вывод их
значений. В противном случае выводится
сообщение «Корней нет».
Примечание: если ветвь состоит только из
одного оператора, «операторные скобки»
begin-end можно не использовать. Циклы с условием
while условие do
begin
операторы
end;
while z > e do
begin
z:=z/n;
n:=n+1;
end;
Пока значение переменной z больше e,
повторяются действия, предписанные
операторами тела цикла
repeat
операторы
until условие;
repeat
z:=z/n;
n:=n+1;
until z <= e;
Действия, предписанные операторами тела
цикла, повторяются до того момента, когда
значение z станет меньшим либо равным e. Цикл с параметром (цикл со счетчиком)
for переменная := выражение
to выражение do
begin
операторы
end;
for n:= 1 to 10 do
begin
a:=a*n;
writeln(n:3, a:10);
end;
Для каждого значения
переменной n, изменяющейся от
1 до 10, повторяются действия,
предписанные операторами тела
цикла
for переменная := выражение
downto выражение do
begin
операторы
end;
for i:= 0 downto -8 do
begin
writeln(i:2, x:8:5);
x:=x/a;
end;
Для каждого значения
переменной i, изменяющейся от 0
до -8, повторяются действия,
предписанные операторами тела
цикла
Автор
yaro-vik
Документ
Категория
Образование
Просмотров
494
Размер файла
175 Кб
Теги
ref, pascal, quick
1/--страниц
Пожаловаться на содержимое документа