Базовые алгоритмические структуры

Базовые алгоритмические структуры

Базовые алгоритмические структуры

Следование

Ветвление

Цикл

Структура программы

1.Название программы

2.Описание типов

3.Описание констант

4.Описание переменных

5.Описание действий

Название программы

program lesson;

Описание констант (const)

const a1 = c1; a2 = c2; …

Пример. const pi = 3.14; c = 2.7531;

Описание типов (type)

type t1 = вид;

t2 = вид;

Пример:

type LatLetter = ('A'..'z');

Days = 1..31;

Описание переменных (var)

var v11, v12,…: type1;

v21, v22,…: type2; …

Пример. var k, i, j: integer ; a, b: real ;

Тип данных

Его значение

Целые типы

integer

-32768…32767

byte

0…255

longint

-2147483648…2147483647

Вещественные типы

real

2,9*10 -39 …1,7*10 38

Char

Символьный

string

строковый

boolean

Логический (0 и 1)

Описание действий (операторов)

begin

…

end

Оператор присваивания

V := A;

V := A+1;

S := a*b;

P := (a+b)*2;

Ввод данных

Read (a1, a2, …, ak)

Readln (A1,A2,...AK);

Вывод данных

Write (A1,A2,...AK); - вывод в строку

Writeln (A1,A2,...AK); - вывод в столбец

Write (a1, ‘ ‘, a2, ‘ ‘) – вывод в строку

Writeln (‘введите сторону квадрата’);

Write (‘площадь квадрата равна_’ , S);

Функция

Назначение

abs ( x )

Модуль x

sqr ( x )

Квадрат x

sqrt ( x )

Квадратный корень из x

round ( x )

Округление х до ближайшего целого

frac ( x )

Дробная часть x

int ( x )

Целая часть x

random

Случайное число от 0 до 1

random ( x )

Случайное число от 0 до x

A div X

Выделение целой части при делении А на Х

A mod X

Выделение остатка при делении А на Х

Разветвляющиеся алгоритмы

1)Полное ветвление

if условие then действие1 else действие2;

2)Неполное ветвление

if условие then действие1;

Оператор выбора

Case переменная of

Значение1: действие 1;

………

ЗначениеX: действиеX

Else действиеN;

End ;

Циклы

• Цикл со счетчиком
• Цикл с предусловием
• Цикл с постусловием

B for i := A downto B    do   begin     . . .   end; " width="640"

цикл со счетчиком

1)A

for i := A to B do   begin     . . .   end;

2)AB

for i := A downto B    do   begin     . . .   end;

Цикл с предусловием

while условие do   begin     оператор1;

оператор2;

…   end ;

Цикл с постусловием

repeat оператор1;

оператор2;

… ;

until условие;