Меню сайта |
|
|
Ученикам |
|
|
Учителю |
|
|
Категории раздела |
|
|
Наш опрос |
|
|
|
|
| Паскаль | |
Ключевые слова
program (програм) - программа
|
Заголовок программы:
program MaxSum;
|
var (вар) - переменная
|
Заголовок описания переменных:
var SUMMA : integer; RU,RT : real;
REMARK : array [1..20] of char;
|
const (конст) - константа
|
Определение констант:
const PI=3.14159; KLmin=1; KLmax=18;
LINE='0123456789abcdef';
|
of (оф) - из
|
Служебное слово в описаниях данных:
W: array of real; TV: set of 0..6;
|
begin (бегин) - начало
|
Составные операторы заключаются
в операторные скобки begin....end.
|
readln (pид-э-лайн) - ввод
|
Пpоцедуpа чтения данных с клавиатуpы.
readln(A,B,I,J);
|
writeln (pайт-э-лайн) - вывод
|
Пpоцедуpа вывода данных на зкpан.
writeln('Gamma = ',RU:6:2,'N = ',N);
writeln('Data = ',24*T-12*M);
|
if (иф) - если
|
Условный оператор.
if TIME>23 then write('good-bye')
else write('good-day');
|
then (зен) - то
|
Служебное слово в операторах
'for' и 'if'.
|
else (элс) - иначе
|
Служебное слово в опереторе if.
if A>0 then X:=1 else X:=-1;
|
for (фo) - для
|
Оператор цикла.
for J:=N to M do writeln (J);
|
to (ту) - увеличивая до
|
Служебное слово в операторе 'for'.
|
do (ду) - выполнить
|
Служебное слово в операторах for,
while, with.
for I:=1 to 12 do writeln(I);
|
downto (даунту)- уменьшая до
|
Служебное слово в операторе for.
for I:=11 downto 1 do read(A[i]);
|
end (энд) - конец
|
Конец действия группы операторов.
|
while (вайл) - пока
|
Оператор цикла с предусловием:
while A<16 do A:=A+1;
|
repeat (рипит) - повторять
|
Оператор цикла с послеусловием.
repeat
read(Ch); write(Ch)
until Ch=chr(32);
|
until (антил) - до
|
Служебное слово в операторе 'repeat'.
|
and (энд)- И
|
Логическая операция И (конъюнкция).
if (A>B) and (B
|
or (ор) - или
|
Логическая функция дизъюнкции.
if A<6 or B=1 then FL:=2;
|
not (нот) - не
|
Логическое отрицание.
if not(A>B) then FL:=1;
|
div (див) - разделить
|
Деление целых чисел.
R := A div B; S := R div 3;
|
mod (мод) - модуль
|
Остаток от деления целых чисел.
A:=B mod 2;
|
(x--2) в степени 7
|
exp(7*ln(x-2))
|
Стандартные типы данных
Тип и обозначение
|
Операции
|
· Целый тип - INTEGER ;
var i , j : integer ;
i : =12 ; j : =7 ;
|
+ - * /
div -деление нацело;
mod -остаток от деления;
odd(x) -четный (false), нечетный (true).
succ(x) -следующее за X.
pred(x) -предыдущее перед X.
|
· Вещественный тип - REAL.
var X , Y : real;
X : = 157.432 ;
Y : =2.107E-10 ;
|
+ - * /
trunc(x) -целая часть дроби.
round(x) -округление до целого.
|
· Литерный тип - CHAR.
var SIM , LM : char ;
SIM : = ' * ' ; LM : = ' Y '.
|
ord(s) -дает порядковый номер символа S.
chr(I) -дает символ c номером I.
|
· Логический тип - BOOLEAN.
var F , P : boolen ;
F : = true ; P : =false ;
(TRUE-истина. FALSE-ложь.)
|
and -коньюнкция ( И ).
or -дизъюнкция ( ИЛИ ).
not -отрицание ( НЕ ).
|
· Строковый тип - STRING.
var Str, Ln : string ;
Str : = ' '; Ln : = ' Pascal ' ;
Str[5] : = ' W ' ;
|
Concat(s1,s2,s3) -функция сцепления строк s1,s2,s3.
Copy(Str,I,N) -функция копирования из Str N символов с I места.
Delete(Str,I,N) -процедура удаления.
Insert(subStr,Str,I) -проц. вставки.
Length(Str) -функция длина строки.
Pos(subStr,Str) -функция контекстного поиска subStr в строке Str.
Str(X:10:3,Str) -процедура преобразования числа X в строку.
Val(Str,X,code) -процедуре преобразования строкового вида числа в число X.
|
http://pascalabc.net
lazarus
a:=strtoint(edit1.text) ;
edit2.text:=InttoStr(a);
|
|
|