https___school.mos.ru_ej_attachments_files_215_598_061_original_%D0%9F%D1%80%D0%B5%D0%B7%D0%B5%D0%BD%D1%82%D0%B0%D1%86%D0%B8%D1%8F%20%D0%BF%D0%BE%20%D0%B8%D0%BD%D1%84%D0%BE%D1%80%D0%BC%D0%B0%D1%82%D0%B8%D0%BA%D0%

1.

2.

Алгоритмизация и программирование, Паскаль, 10 класс
Вывод на экран
program qq;
begin
write('2+');
{ без перехода }
writeln('2=?'); { на новую строку}
writeln('Ответ: 4');
end.
Протокол:
2+2=?
Ответ: 4
К.Ю. Поляков, Е.А. Ерёмин, 2013
http://kpolyakov.spb.ru

3.

Алгоритмизация и программирование, Паскаль, 10 класс
Объявление переменных
Типы переменных:
• integer
{ целая }
• real
{ вещественная }
• и другие…
выделение
Объявление переменных:
variable – переменная
места в памяти
тип – целые
var a, b, c: integer;
список имен
переменных
К.Ю. Поляков, Е.А. Ерёмин, 2013
ГБПОУ МО "Колледж "Коломна" СП2 Михалин В.В.
http://kpolyakov.spb.ru

4.

5.

Алгоритмизация и программирование, Паскаль, 10 класс
«Условный оператор» или «Ветвление»
На языке Pascal условное ветвление описывает оператор If, который имеет
следующий вид:
К.Ю. Поляков, Е.А. Ерёмин, 2013
ГБПОУ МО "Колледж "Коломна" СП2 Михалин В.В.
http://kpolyakov.spb.ru

6.

Алгоритмизация и программирование, Паскаль, 10 класс
Задача
Напишите программу, которая делит число А на число В, если В=0, выводит
ошибку «на 0 делить нельзя»
Program zadamie2;
Var b,c: integer;
a: real;
BEGIN
Writeln ('Введите число с');
Readln(c);
Writeln ('Введите число b');
Readln (b);
If b=0 Then Writeln('Делить на ноль нельзя!')
Else a:=c/b;
writeln('Ответ = ',a);
END.
К.Ю. Поляков, Е.А. Ерёмин, 2013
ГБПОУ МО "Колледж "Коломна" СП2 Михалин В.В.
http://kpolyakov.spb.ru

7.

Алгоритмизация и программирование, Паскаль, 10 класс
Задача
Написать программу, которая будет заменять переменную противоположным
значением, если она изначально была меньше нуля.
Program lab2_2;
Var x: integer;
BEGIN
Writeln ('Введите число х');
Readln(x);
If x<0 Then x:= -x; {как видим оператор Else отсутствует!}
Writeln ('Наше число',x);
END.
К.Ю. Поляков, Е.А. Ерёмин, 2013
ГБПОУ МО "Колледж "Коломна" СП2 Михалин В.В.
http://kpolyakov.spb.ru

8.

Алгоритмизация и программирование, Паскаль, 10 класс
Домашнее задание
К.Ю. Поляков, Е.А. Ерёмин, 2013
ГБПОУ МО "Колледж "Коломна" СП2 Михалин В.В.
http://kpolyakov.spb.ru