Додохова К.А

приводит к решению поставленной задачи за конечное число шагов.


АЛГОРИТМ –

Исполнитель – живое существо или автоматическое устройство, которое способно к восприятию и исполнению команд.

замочную скважину.
Повернуть ключ два раза против часовой стрелки.
Вынуть ключ.


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

Алгоритм называется линейным, если исполнитель выполняет команды последовательно друг за другом (в порядке их записи).

условия выполняется либо одна, либо другая последовательность действий.




Пример:
Если завтра на

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

число раз или пока не выполнено заданное условие.









Пример:
Покрасить доску;
Если есть

Циклический алгоритм

из которых описывает один или несколько шагов алгоритма.

Графический способ

французского ученого Блеза Паскаля;
В 1979 году утвержден в качестве стандартного

История создания языка

имя любого объекта языка. Состоит из латинских букв (a...z), цифр

Алфавит языка

описания меток>
Type
Var

Структура программы на языке паскаль

)

Write – от англ

Предназначен для вывода на экран текста или результата вычислений

переход на следующую строку

)

Read- от англ «читай»

Предназначен

это я!’);
End.


Вывести на экран приветствие:
Привет,
это я!


Program privet;
Begin
Write(‘Привет,’);
Writeln(‘это я!’)
End.

полная форма:
If then
Условный оператор

чисел


Условный оператор

Program sravnenie;
Var A, B, Max: integer;
Begin
Write(‘введите два числа’);
Read (A,

больше 3.


Условный оператор

Program chislo;
Var A: integer;
Begin
Write(‘введите число’);
Read (A);
If A>3 then

дискриминанту.
Решение:


Условный оператор

Program Diskr;
Var A, B, C, D: real;
Begin
Write(‘введите коэффициенты A,

K – выражение-селектор (имеет только порядковый целый, логический, символьный тип);

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

writeln(‘четыре’)
Else writeln(‘введено другое число’)
End;
End.
Задача: Составить программу, которая преобразует введенные с

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

– до)

Цикл с параметром

(цикл – пока)

primer;
Var a, s, n: integer;
Begin
Write(‘введите N’);
Readln(N); S:=0;
While a

Цикл с предусловием (цикл – пока)

AA; var    zz, n, k : integer; begin     zz:=0;    n:=2;    k:=1;     while n>k do begin         zz:=zz+1;         n:=n+5;         k:=k*2;     end; Writeln(zz);
end.

Цикл

– до)

primer;
Var a, s, n: integer;
Begin
Write(‘введите N’);
Readln(N); s:=0;
repeat
s:=s+a;
a:=a+1;
until a>n;
Writeln(‘результат суммирования

Цикл с постусловием (цикл – до)

AA; var    xx, k : integer; begin     xx:=0;    k:=2;     repeat         xx:=xx+1;         k:=k+1;     until k=7; Writeln(xx);
end.

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

цикла> 2) for i:=m downto n do
Цикл

1 до 10
Program kub;
Var a, c: integer;
Begin
For a:=1 to 10

Цикл c параметром

10 до 1.
да
нет
Program primer_4;
Var n, c: integer;
Begin
For n:=10 downto

Цикл c параметром

Pr; var     k : integer; begin     for k:=1 to 2 do writeln(k); end.

Цикл c

AA; var  xx, i : integer; begin     xx:=0;     for i:=3 to 5 do xx:=xx+1;

Цикл c параметром

х:5

Для действительных чисел:

Переменная :

Для того, чтобы данные не «слипались» при выводе их на экран и для десятичного представления действительных чисел, в командах Write и Writeln используется формат вывода.

Формат вывода

Простые типы данных.

Затем выводит на их на экран.
Program Dialog;
Var a: integer;

7-9 классы/ И.Г. Семакин, Л.А. Залогова, С.В. Русаков, Л.В. Шестакова.