«Решение задач на языке программирования» (Подготовка к ОГЭ)

1. «Решение задач на языке программирования» (Подготовка к ОГЭ)

«РЕШЕНИЕ ЗАДАЧ НА
ЯЗЫКЕ
ПРОГРАММИРОВАНИЯ»
(ПОДГОТОВКА К ОГЭ)

2.

Языки программирования - это формальные языки, предназначенные для записи
алгоритмов, исполнителем которых будет компьютер.
Записи алгоритмов на языках программирования называются программами.
Язык Паскаль – универсальный язык программирования.
Никлаус Вирт (род. в 1934 г.) - швейцарский
учёный, специалист в области
информатики, один из известнейших
теоретиков в области разработки языков
программирования, профессор
информатики (компьютерных наук).
Разработчик языка Паскаль и ряда других
языков программирования.

3.

Алфавит языка
Алфавит языка программирования Паскаль - набор допустимых
символов, которые можно использовать для записи программы.
Алфавит языка Паскаль
Латинские прописные
буквы
A, B, C, …, X Y, Z
Латинские строчные
буквы
a, b, c,…, x, y, z
Арабские цифры
0, 1, 2, …, 7, 8, 9
Специальные
символы
Знаки арифметические,
препинания, скобки и другие

4.

Алфавит языка
В алфавит языка Паскаль включены неделимые элементы
(составные символы).
Неделимые элементы
Знак операции
присваивания
Знаки больше или равно,
меньше или равно
:=
>= и <=

5.

Простые числовые типы данных

6.

Структура программы на языке Паскаль
Структура программы
Описание данных
Описание действий
Описание констант, меток и
описание переменных (var)
Начинается словом begin и
заканчивается словом end
с точкой

7.

VAR список однотипных переменных: INTEGER;
список однотипных переменных:REAL;
BEGIN
READ(список ввода);
READLN(список ввода);
переменная:=арифметическое выражение ;
WRITE(список вывода);
WRITELN(список вывода);
END.

8.

Арифметические
операции
+
сложение
-
вычитание
Функции
F (x)
ABS (x)
|x|
SQR (x)
x2
*
умножение
/
деление
SQRT (x)
x
div
деление
нацело
SIN (x)
Sin x
Остаток
от деления
COS (x)
Cos x
mod

9. Оператор цикла FOR

FOR имя:= выражение1 TO выражение 2 DO оператор
Правило записи оператора IF
IF условие THEN оператор 2 ELSE оператор

10. Задача 1

11.

Программа (Задача 1)
Var a, i, n, min: integer;
Begin
Writeln (‘Введите количество чисел’);
Readln (n);
min:= 30000;
For i:= 1 to n do
begin
Writeln (‘Введите число’);
Readln (a);
if (a < min) and (a mod 7 =0) then min:=a
end;
Writeln (‘ Миним. число, делящееся нацело на 7 =‘ , min);
Readln
end.

12. Самостоятельное решение задачи: Задача 2

13. Самостоятельное решение задачи: Задача 3

14. Домашняя работа: Задача 4