Разработка урока программирование линейных алгоритмов

• 1 слайд

  
  Центр повышения квалификации
  «Московский областной центр Интернет-образование»
  
  
  
  «Программирование линейных алгоритмов
  на языке Паскаль»
  
  
  

• 2 слайд

  Числовые типы данных
  Стандартные функции языка Паскаль:
  

• 3 слайд

  Операции random и random(x)
  program n_1;
  var x, a, b, c, s: integer;
  begin
  writeln ('Нахождение суммы цифр числа');
  randomize;процедура используется для включения генератора случайных чисел
  x:=random(22767)+10000;диапазон числа
  writeln (‘число х: ',х );
  a:=x div 10000;
  b:=x mod 10000 div 1000;
  c:=x mod 10;
  s:=a+b+c;
  writeln ('s= ', s)
  end.
  Составить программу для вычисления:
  Дано пятизначное число из интервала [10000, 32767]. Найти сумму первой, второй и пятой цифр этого числа.
  

• 4 слайд

  Вопросы и задания
  Для заданного x вычислите у по формуле
  у = х3 + 2,5х2 – х +1.
  При этом:
  а) операцию возведения в степень использовать запрещено;
  б) в одном операторе присваивания можно использовать не более одной арифметической операции (сложение, умножение, вычитание);
  в) в программе может быть использовано не более пяти операторов присваивания.
  Подсказка: преобразуйте выражение к следующему
  виду: y =((x + 2,5)x –1)x +1.
  По заданным координатам точек А и В вычислите длину отрезка АВ.
  Известны длины сторон треугольника a, b, c.
  Напишите программу, вычисляющую площадь этого треугольника.
  Известны координаты вершин A, B, C треугольника.
  Напишите программу, вычисляющую площадь этого треугольника.
  Если сумма налога исчисляется в рублях и копейках, то налоговая служба округляет её до ближайшего рубля (до 50 копеек - с недостатком, свыше 50 копеек (включая 50) - с избытком).
  Используйте компьютер, чтобы ввести точную сумму налога и вывести, сколько следует уплатить.
  Исследуйте работу функции random, запустив многократно на выполнение программу:
  program n_8;
  var x, n: integer;
  begin
  writeln ('Исследование функции random');
  randomize (*для генерации различных случайных чисел
  при каждом запуске программы *);
  write ('Введите x>>');
  readln (x);
  write ('Введите n>>');
  readln (n);
  writeln ('random(', x, ')=', random(x));
  writeln ('random(', x, ')+', n, '=', random(x)+n)
  end.
  Как можно получить случайное число из промежутка (0; x)?
  Как можно получить случайное число из промежутка (0; x]?
  Как можно получить случайное число из промежутка (n; x + n)?
  Одна компания выпустила лотерейные билеты трёх разрядов: для молодежи, для взрослых и для стариков.
  Номера билетов каждого разряда лежат в пределах:
  для молодёжи - от 1 до 100;
  для взрослых - от 101 до 200;
  для стариков - от 201 до 250.
  С помощью компьютера выберите случайным образом лотерейный билет в каждом разряде.
  Запишите на языке Паскаль программу, которая для произвольного двузначного числа определяет:
  а) сумму и произведение его цифр;
  б) число, образованное перестановкой цифр исходного числа.
  Запишите на языке Паскаль программу, которая
  вычисляет сумму кодов букв в слове БАЙТ.
  Запишите на языке Паскаль программу, которая выводит на экран строку символов, коды которых равны 66, 69, 71, 73, 78.
  Разработайте программу, которая запрашивает три строковые величины – взаимосвязанные прилагательное, существительное и глагол, а затем печатает все варианты фраз с использованием введённых слов.
  Даны значения целочисленных переменных:
  a = 10, b = 20.
  Чему будет равно значение логической переменной rez после выполнения операции присваивания?
  а) rez:=(a=10) or (b>10)
  б) rez:=(a>5) and (b>5) and (a<20) and (b<30)
  в) rez:=( (not(a<15)) or (b>20)
  Составьте программу, вводящую true, если высказывание является истинным, и false в противном случае:
  а) сумма цифр трёхзначного числа x является чётным числом;
  б) треугольник со сторонами a, b, с является разносторонним.
  Идёт k-я секунда суток. Разработайте программу, которая по введённой k-й секунде суток определяет, сколько целых часов h и целых минут m прошло с начала суток.
  Например, если k =13257=3 х 3600 + 40 х 60 + 57,
  то h =3 и m = 40.
  Выведите на экран фразу: It is … hours … minutes.
  Вместо многоточий программа должна выводить значения h и m, отделяя их от слов ровно одним пробелом.
  Запишите на языке Паскаль программу, реализующую алгоритм работы кассира, выдающего покупателю сдачу (s) наименьшим количеством банкнот по 500 (k500), 100 (k100), 50 (k50) и 10(k10) рублей.
  

Домашняя работа

«Учимся программировать линейные алгоритмы»

Шаг 1. Знакомство с этапами разработки программы

1.     Какой этап является первым при создании новой программы?

1)    Выбор (или разработка) метода решения

2)    Разработка алгоритма решения задачи

3)    Постановка задачи

4)    Формализация (математическая постановка)

5)    Составление программы

Ответ:__________________

2.     Что используется для имен переменных в Паскале?

1)    Слова, состоящие из латинских букв

2)    Зарезервированные слова

3)    Слова, состоящие из русских букв

4)    Слова, состоящие из латинских букв и цифр

5)    Слова, состоящие из латинских и русских букв

Ответ:__________________

3.     Что такое трассировка программы и для чего она нужна?

_________________________________________________________________

_________________________________________________________________ _________________________________________________________________

4.     Для чего нужно тестирование программы?

_________________________________________________________________

_________________________________________________________________ _________________________________________________________________

5.     Что должно учитываться при составлении тестов?

_________________________________________________________________

_________________________________________________________________ _________________________________________________________________

Шаг 2. Изучаем язык программирования Паскаль

1.   Какой знак используется для разделения операторов?

1)      ,          2)  .          3)  :          4)  ;          5)  /          6)  := 

Ответ:__________________

2.   Имеются переменные в операторах:

А:='2';   b:=2;   c:=true;   d:=123458;   e:=25.45678;   f:='25'; g:='pascfl';   h:=0.0000003;   i:='i';   j:='false';

Запишите, какие переменные к каким из типов integer, real, char, boolean могут быть отнесены.

integer: __________________________________________________ real: _____________________________________________________ char: _____________________________________________________ boolean: __________________________________________________

3.   Укажите номера правильных записей оператора вывода на Паскале.

1)      write ln('а=', а);   2) print('a=', a);   3) println((a);

4) writeline(a);   5) WRITE(f);   6) writeln(f).

Ответ:__________________

Для дополнительного выполнения

4.   (Из материалов ГИА.) Определите значение переменной a после исполнения алгоритма.

a:=4; b:=8+2*a; a:=b/2*a;

Ответ:__________________

5.   (Из материалов ГИА.) Определите значение переменной a после исполнения алгоритма.

a:=16; b:=12–a/4;

a:=a+b*3;

Ответ:__________________

6.   (Из материалов ГИА.) Определите значение переменной a после исполнения алгоритма.

a:=4 b:=10 a:=b-a*2

b:=24/a*4

Ответ:__________________

Шаг 3. Решаем задачи на Паскале

Задача 1. Среднее арифметическое. Вводятся три целых числа. Найдите среднее арифметическое этих чисел.

1. Дан набор команд в произвольном порядке (других команд в программе быть не должно). Соберите программу путем выбора правильных команд.

program sredarifm; d:=a+b+c; writeln('sa = ', d); d: real; begin

var a, b, c: integer; d:=d/3; readln (a, b, c, d); writeln('sa = ', sa:5:2); var d: real; end.

var a, b, c, d: integer; readln (a, b, c); var a, b, c, d: real;

Всего команд в программе: _____

2.   Составьте тесты для проверки правильности решения задачи:

№ теста	Входные данные			Результат
	а	b	c	d
1
2
3
4
5

3.   Выполните программу для предложенных тестовых данных (протестируйте ее). Если обнаружите ошибки, исправьте их.

Задача 2. Перестановки. Вводятся две переменные. Поменяйте местами значения переменных в ячейках.

1. Дан набор команд в произвольном порядке (других команд в программе быть не должно). Соберите программу путем выбора правильных команд.

c:=a; program obmen; end. writeln(a, '  ', b, '  ', c); b:=a; begin var a, b: integer; a:=c; readln (a, b); c:=b;

writeln(a, '  ', b); var a, b, c: integer; b:=c;

readln (a, b, c);

Всего команд в программе: _____

2.   Составьте тесты для проверки правильности решения задачи:

№ теста	Входные данные		Промежуточные данные	Результаты
	а	b	с	а	b
1
2
3
4
5

3.   Выполните программу для предложенных тестовых данных (протестируйте ее). Если обнаружите ошибки, исправьте их. Задача 3. Вычисление степени. Вводится целочисленная переменная х. Найдите х⁴ за два умножения.

1.   Дан набор команд в произвольном порядке (других команд в программе быть не должно). Соберите программу путем выбора правильных команд.

program x4; writeln(x, '  ', y); y:=x*x; begin var x: integer; х:=у*y; readln (x, y); end. y:=y*y; writeln(x); var x, y: integer; y:=x; readln (x); y:=y*x; var x, y: real;

writeln(y);

Всего команд в программе: _____

2.   Составьте тесты для проверки правильности решения задачи:

№ команды	Команда	Переменная	Значения		Смысл команды
			Тест 1	Тест 2
1	readln(x)	x	2	3	Ввод значения в переменную x
2

3.   Выполните программу для предложенных тестовых данных (протестируйте ее). Если обнаружите ошибки, исправьте их. Задача 4. Вычисление степени. Вводится целочисленная переменная х. Найдите х⁶ за три умножения.

1.   Дан набор команд в произвольном порядке (других команд в программе быть не должно). Соберите программу путем выбора правильных команд.

y:=x*x; writeln(y); var x: integer; program x6; x:=x*x; readln (x, y); end. y:=y*y; writeln(x); begin

writeln(x, '  ' ,y); var x, y: integer; y:=x; readln (x); y:=y*x; var x, y :real;

x:=x*y;

2.   Составьте тесты для проверки правильности решения задачи:

№ команды	Команда	Переменная	Значения		Смысл команды
			Тест 1	Тест 2
1	readln(x)	x	2	3	Ввод значения в переменную x
2

3.   Выполните программу для предложенных тестовых данных (протестируйте ее). Если обнаружите ошибки, исправьте их.

Выводы

Для того чтобы составить программу для линейного алгоритма и выполнить ее на компьютере, нужно:

____________________________________________________________________

____________________________________________________________________

____________________________________________________________________

____________________________________________________________________ ____________________________________________________________________

Оценка учителя: ____________________

Домашняя работа

«Учимся программировать линейные алгоритмы»

Шаг 1. Знакомство с этапами разработки программы

1.   Какой этап является первым при создании новой программы?

1)    Выбор (или разработка) метода решения

2)    Разработка алгоритма решения задачи

3)    Постановка задачи

4)    Формализация (математическая постановка)

5)    Составление программы

Ответ:__________________

2.   Что используется для имен переменных в Паскале?

1)    Слова, состоящие из латинских букв

2)    Зарезервированные слова

3)    Слова, состоящие из русских букв

4)    Слова, состоящие из латинских букв и цифр

5)    Слова, состоящие из латинских и русских букв

Ответ:__________________

3.   Что такое трассировка программы и для чего она нужна?

_________________________________________________________________

_________________________________________________________________

_________________________________________________________________

4.   Для чего нужно тестирование программы?

_________________________________________________________________

_________________________________________________________________

_________________________________________________________________

5.     Что должно учитываться при составлении тестов?

_________________________________________________________________

_________________________________________________________________

_________________________________________________________________

Шаг 2. Изучаем язык программирования Паскаль

1.   Какой знак используется для разделения операторов?

1)  ,          2)  .          3)  :          4)  ;          5)  /          6)  :=

Ответ:__________________

2.   Имеются переменные в операторах:

А:='2';   b:=2;   c:=true;   d:=123458;   e:=25.45678;   f:='25';

g:='pascfl';   h:=0.0000003;   i:='i';   j:='false';

Запишите, какие переменные к каким из типов integer, real, char, boolean могут быть отнесены.

integer: __________________________________________________

real: _____________________________________________________

char: _____________________________________________________

boolean: __________________________________________________

3.   Укажите номера правильных записей оператора вывода на Паскале.

1) write ln('а=', а);   2) print('a=', a);   3) println((a);

4) writeline(a);   5) WRITE(f);   6) writeln(f).

Ответ:__________________

Для дополнительного выполнения

4.   (Из материалов ГИА.) Определите значение переменной a после исполнения алгоритма.

a:=4;

b:=8+2*a;

a:=b/2*a;

Ответ:__________________

5.   (Из материалов ГИА.) Определите значение переменной a после исполнения алгоритма.

a:=16;

b:=12–a/4;

a:=a+b*3;

Ответ:__________________

6.   (Из материалов ГИА.) Определите значение переменной a после исполнения алгоритма.

a:=4

b:=10

a:=b-a*2

b:=24/a*4

Ответ:__________________

Шаг 3. Решаем задачи на Паскале

Задача 1. Среднее арифметическое. Вводятся три целых числа. Найдите среднее арифметическое этих чисел.

1.   Дан набор команд в произвольном порядке (других команд в программе быть не должно). Соберите программу путем выбора правильных команд.

program sredarifm;

d:=a+b+c;

writeln('sa = ', d);

d: real;

begin

var a, b, c: integer;

d:=d/3;

readln (a, b, c, d);

writeln('sa = ', sa:5:2);

var d: real;

end.

var a, b, c, d: integer;

readln (a, b, c);

var a, b, c, d: real;

Всего команд в программе: _____

2.   Составьте тесты для проверки правильности решения задачи:

№ теста	Входные данные			Результат
	а	b	c	d
1
2
3
4
5

3.   Выполните программу для предложенных тестовых данных (протестируйте ее). Если обнаружите ошибки, исправьте их.

Задача 2. Перестановки. Вводятся две переменные. Поменяйте местами значения переменных в ячейках.

1.   Дан набор команд в произвольном порядке (других команд в программе быть не должно). Соберите программу путем выбора правильных команд.

c:=a;

program obmen;

end.

writeln(a, '  ', b, '  ', c);

b:=a;

begin

var a, b: integer;

a:=c;

readln (a, b);

c:=b;

writeln(a, '  ', b);

var a, b, c: integer;

b:=c;

readln (a, b, c);

Всего команд в программе: _____

2.   Составьте тесты для проверки правильности решения задачи:

№ теста	Входные данные		Промежуточные данные	Результаты
	а	b	с	а	b
1
2
3
4
5

3.   Выполните программу для предложенных тестовых данных (протестируйте ее). Если обнаружите ошибки, исправьте их.

Задача 3. Вычисление степени. Вводится целочисленная переменная х. Найдите х⁴ за два умножения.

1.   Дан набор команд в произвольном порядке (других команд в программе быть не должно). Соберите программу путем выбора правильных команд.

program x4;

writeln(x, '  ', y);

y:=x*x;

begin

var x: integer;

х:=у*y;

readln (x, y);

end.

y:=y*y;

writeln(x);

var x, y: integer;

y:=x;

readln (x);

y:=y*x;

var x, y: real;

writeln(y);

Всего команд в программе: _____

2.   Составьте тесты для проверки правильности решения задачи:

№ команды	Команда	Переменная	Значения		Смысл команды
			Тест 1	Тест 2
1	readln(x)	x	2	3	Ввод значения в переменную x
2

3.   Выполните программу для предложенных тестовых данных (протестируйте ее). Если обнаружите ошибки, исправьте их.

Задача 4. Вычисление степени. Вводится целочисленная переменная х. Найдите х⁶ за три умножения.

1.   Дан набор команд в произвольном порядке (других команд в программе быть не должно). Соберите программу путем выбора правильных команд.

y:=x*x;

writeln(y);

var x: integer;

program x6;

x:=x*x;

readln (x, y);

end.

y:=y*y;

writeln(x);

begin

writeln(x, '  ' ,y);

var x, y: integer;

y:=x;

readln (x);

y:=y*x;

var x, y :real;

x:=x*y;

2.   Составьте тесты для проверки правильности решения задачи:

№ команды	Команда	Переменная	Значения		Смысл команды
			Тест 1	Тест 2
1	readln(x)	x	2	3	Ввод значения в переменную x
2

3.   Выполните программу для предложенных тестовых данных (протестируйте ее). Если обнаружите ошибки, исправьте их.

Выводы

Для того чтобы составить программу для линейного алгоритма и выполнить ее на компьютере, нужно:

____________________________________________________________________

____________________________________________________________________

____________________________________________________________________

____________________________________________________________________

____________________________________________________________________

Оценка учителя: ____________________

Практическая работа № 1

Типы данных. Оператор присваивания. 

Создание программ на языке программирования Паскаль

Цель работы: Изучить различные типы данных языка Pascal и оператор присваивания, научится создавать простейшие программы для реализации линейного алгоритма.

Содержание работы. 

Основные понятия.

1                     Алгоритм – это последовательность команд, предназначенная исполнителю, в результате выполнения которой он должен решить поставленную задачу.

2                     Формульно-словесный способ представления алгоритмов основан на задании инструкций о выполнении конкретных действий в четкой последовательности в сочетании со словесными пояснениями.     

3                     Способ представления алгоритмов на алгоритмическом языке. Алгоритмический язык – совокупность правил и обозначений, использующиеся для записи алгоритма.     

4                     Графический способ представления алгоритмов (метод блок-схемы).     При таком представлении алгоритма, каждый этап отображается в виде геометрических фигур-блоков, форма которых зависит от выполняемой операции.    

5                     Линейный алгоритм – это алгоритм, в котором блоки выполняются последовательно сверху вниз от начала до конца.

6                     Под переменной будем понимать некоторую ячейку памяти, т. е. отдельное место для хранение одной константы. Переменные вводятся в программу для хранения и передачи данных внутри нее.

выражение	7	Любая переменная имеет имя – идентификатор. По правилам языка Паскаль имя переменной должно начинаться с буквы и может содержать буквы (только латинские), цифры и знак подчеркивания. Длина имени – до 126 символов. Арифметические действия и выражения в Паскале: «+» - сложение; «-» - вычитание; «*» - умножение; «/» - деление; mod - нахождение остатка от деления; div - деление нацело (находить остаток от деления и делить нацело можно только целые числа); для указания порядка действий используются только круглые скобки, их может быть несколько, главное, чтобы количество открывающихся скобок равнялось количеству sqr(x) – возведение аргумента в квадрат; sqrt(x) – извлечение квадратного корня; abs(x) – модуль.  Общий вид оператора присваивания: <Имя_переменной>:=<арифметическое >.   Для типов переменной слева и арифметического выражения справа от знака выполняются правила: если переменная вещественного типа, то арифметическое выражение может быть как целого, так и вещественного типа, выражение преобразуется к вещественному типу; если переменная слева целого типа, то арифметическое выражение только
	8  ‒ ‒ ‒ ‒ ‒ ‒ ‒ закрывающихся; ‒ ‒ ‒ 9  10 ‒ ‒ целочисленное.
Задание

1                     Составить и записать алгоритм решения задачи в графическом и словесноформульном виде

2                     Написать программу на языке Паскаль 

3                     Ввести программу и запустить еѐ на исполнение.

4                     Отладить программу (найти и исправить возможные ошибки).

5                     Протестировать алгоритм с различными данными.

6                     Проанализировать программу и сделать вывод.

Пример задачи.

Исходные данные:

Даны два ненулевых числа. Найти сумму, разность, произведение и частное их квадратов

Решение:

1    Алгоритм в графическом и словесном виде:

 

1.    Начало;

2.    Ввод (X; Y);

3.    X := X * X;

4.    Y := Y * Y;

5.    S := X + Y;

6.    R := X – Y;

7.    P := X * Y;

8.    C := X / Y;

9.    Вывод (S; R; P; C); 10. Конец.

2    Программа на языке Паскаль:

program lin; var X, Y, S, R, P, C:real; begin

    write(‘Введите первое число  ’);     readln(X);

    write(‘Введите второе число  ’);     readln(Y);     X := X * X;

    Y := Y * Y;

    S := X + Y;

    R := X – Y;

    P := X * Y;

    C := X / Y;

    writeln(‘Сумма квадратов Ваших чисел =  ’,  S);     writeln(‘Разность квадратов Ваших чисел =  ’,  R);     writeln(‘Произведение квадратов Ваших чисел =  ’,  P);     writeln(‘Частное квадратов Ваших чисел =  ’,  C); end.

3    Программный код для запуска          5  Тестирование программы с различными данными:

 

4    Ошибок в программе нет

6  Вывод: Программа, осуществляющая линейный алгоритм, работает правильно, но для вычисления частного двух чисел необходима проверка второго на равенство нулю. Следовательно, для корректной работы программы надо изменить тип алгоритмической структуры.

Задания к практической работе.

1                     Даны длины ребер а, b, c прямоугольного параллелепипеда. Найти его объем и площадь поверхности 

2                     Дана длина ребра куба a. Найти его объем и площадь поверхности 

3                     Даны катеты прямоугольного треугольника а и b. Найти его гипотенузу c, площадь

S и периметр P  

4                     Дана длина L окружности. Найти ее радиус R и площадь S круга, ограниченного этой окружностью, учитывая, что L 2R, aSR2 . В качестве значения π использовать 3.14.

5                     Дана площадь S круга. Найти его диаметр D и длину L окружности, ограничивающей этот круг, учитывая, что ^{L 2R, aSR2} . В качестве значения π использовать 3.14.

6                     Найти значение функции y = 3 x⁶ — 6 x² — 7 при данном значении x.

7                     Найти значение функции y = 4(x—3)⁶ — 7(x—3)³ + 2 при данном значении x.

8                     Дано значение температуры T в градусах Цельсия. Определить значение этой же температуры в градусах Фаренгейта. Температура по Цельсию T_C и температура по

Фаренгейту T_F связаны следующим соотношением: ТС  ТF 32 59

9                     Найти длину окружности L и площадь круга S заданного радиуса R:  В качестве значения π использовать 3.14.

10                 Даны переменные A, B, C. Изменить их значения, переместив содержимое A в C, C — в B, B — в A, и вывести новые значения переменных A,B, C.

11                 Известно, что X кг шоколадных конфет стоит A рублей, а Y кг ирисок стоит B рублей. Определить, сколько стоит 1 кг шоколадных конфет, 1 кг ирисок, а также во сколько раз шоколадные конфеты дороже ирисок.

12                 Дано значение температуры T в градусах Фаренгейта. Определить значение этой же температуры в градусах Цельсия. Температура по Цельсию T_C и температура по

Т^С  Т^F 32 5⁹ Фаренгейту T_F связаны следующим соотношением:

13                 Поменять местами содержимое переменных A и B и вывести новые значения A и B.

14                 Даны переменные A, B, C. Изменить их значения, переместив содержимое A в B, B — в C, C — в A, и вывести новые значения переменных A, B, C.

15                 Основание прямой призмы – прямоугольный треугольник с катетами а и b. Высота призмы равна h. Найти площадь поверхности и объем призмы.

16                 Сторона основания правильной четырехугольной пирамиды равна а, а высота – h.

Найти площадь поверхности и объем пирамиды.

17                 Найти объем шара радиуса R и площадь его поверхности.

18                 Найти площадь поверхности и объем кругового цилиндра, радиус основания которого равен R, а высота h.

19                 Найти площадь осевого сечения прямого кругового конуса с радиусом основания R и образующей L.

20                 Найти площадь поверхности и объем прямого кругового конуса с радиусом основания R и высотой h.

21                 Сторона основания правильной треугольной пирамиды равна а, а высота – h.

Найти площадь поверхности и объем пирамиды.

22                 Сторона основания правильной шестиугольной пирамиды равна а, а высота – h. Найти площадь поверхности и объем пирамиды.

23                 Сторона основания правильной треугольной призмы равна а. Высота призмы равна h. Найти площадь поверхности и объем призмы.

24                 Сторона основания правильной шестиугольной призмы равна а. Высота призмы равна h. Найти площадь поверхности и объем призмы.

25                 Даны длины ребер а, b, c прямоугольного параллелепипеда. Найти длину диагонали параллелепипеда

26                 Найти площадь поверхности прямого кругового усеченного конуса с радиусом оснований R₁, R₂ и высотой h.

27                 Найти объем прямого кругового усеченного конуса с радиусом оснований R₁, R₂ и образующей L.

28                 Координаты концов отрезка – (х₁, у₂) и (х₂, у₂). Вычислить координаты точки, делящей отрезок пополам.

29                 Найти объем шара, если площадь его поверхности равна S.

30                 Найти площадь поверхности и объем кругового цилиндра, высота которого равна h, а площадь осевого сечения – S.

ИНСТРУКЦИОННАЯ КАРТА

для проведения  практической работы № 1

Тема занятия: Типы данных. Оператор присваивания. Создание программ на языке программирования Паскаль

Цель выполнения задания: изучить различные типы данных языка Pascal и оператор присваивания, научится создавать простейшие программы для реализации линейного алгоритма 

Необходимо знать: основные свойства алгоритмов, правила написания блок-схем и словесно-формульного способа представления алгоритма, операторы присваивания, ввода и вывода данных, структуру программы на языке Паскаль

Необходимо уметь: применять основные свойства алгоритмов, правила написания блок-схем и словесно-формульного способа представления алгоритма, операторы присваивания, ввода и вывода данных, структуру программы на языке Паскаль

Оборудование (приборы, материалы, дидактическое обеспечение): методические рекомендации к выполнению работы; задание и инструкционная карта для проведения практического занятия

Компьютерные программы: программы Borland Pascal, Pascal ABC, Ms Word

Теория:  для выполнения заданий по данной теме необходимо предварительно изучить теоретические материалы,  а также методические рекомендации к выполнению работы

Порядок выполнения задания, методические указания: - ознакомиться с теоретическими положениями по данной теме; - изучить схему решения задач; - выполнить задания практической работы; - сформулировать вывод 

Дополнительные задания:  могут быть сформулированы по ходу занятия

Содержание отчета:   отчет по практической работе должен содержать: основные определения, рассуждения по решению задач, ответ; вывод по работе

Контрольные вопросы:  1  Что такое алгоритм? 2  Способы представления алгоритма  3  Что такое линейный алгоритм?  4  Что такое переменная, для чего используется?  5  Что такое идентификатор?  6  Какие правила использования идентификаторов в Паскале?  7  Какие основные действия можно выполнять в программе и как они записываются?  8  Как выглядит оператор присваивания?  9  Каковы особенности работы оператора присваивания?

Литература:

1                     Федотова Е.Л. Информационные технологии в профессиональной деятельности, Москва: ИД «ФОРУМ» – ИНФРА-М, 2011

2                     О. В. Горбатова. Информатика: Учебник для техникумов и колледжей ж.-д.

транспорта. - М: ГОУ «Учебно-методический центр по образованию на железнодорожном транспорте», 2008. - 242 с.

3                     Н. Угринович Информатика и информационные технологии –М. Бином 2003 г.

4                     В.Ю. Микрюков Информация. Информатика. Компьютер. Информационные системы. Сети Ростов-на-Дону. Феникс. 2007 г.

5                     http://linux-mgd.3dn.ru/

6                     http:// pas1.ru/

7                     http://life-prog.ru/

• 1 слайд

  
  Центр повышения квалификации
  «Московский областной центр Интернет-образование»
  
  
  
  «Программирование линейных алгоритмов
  на языке Паскаль»
  
  
  

• 2 слайд

  Для вывода результатов в Паскале используется оператор:
  print
  begin
  readln
  ДАЛЕЕ
  Что из нижеперечисленного не входит в алфавит языка Паскаль?
  латинские строчные и прописные буквы
  знак подчеркивания
  служебные
  слова
  русские строчные и
  прописные буквы
  Какая последовательность символов может служить именем в языке Паскаль?
  _mas
  maS1
  d2
  2d
  _mas
  maS1
  d2
  2d
  ДАЛЕЕ
  write
  write
  русские строчные и
  прописные буквы
  

• 3 слайд

  Подбери верное
  Раздел объявления переменной
  Начало программы
  Заголовок программы
  Оператор вывода
  Операция присвоения
  Оператор ввода
  Конец программы
  Тип целых величин
  Тип вещественных величин
  readln
  end
  program
  begin
  :=
  var
  integer
  real
  writeln
  var
  begin
  :=
  real
  program
  writeln
  end
  readln
  

• 4 слайд

  Составить блок схему для сложения чисел А+В, вводимых с клавиатуры
  НАЧАЛО
  Ввод А,В
  S=А+В
  ВЫВОД S
  КОНЕЦ
  program Summa;
  end.
  Var a,b,S: integer;
  begin
  S= a + b;
  writeln(‘S=‘, S);
  readln(a,b);
  

• 5 слайд

  Первая программа: вычислить длину окружности и площадь круга, если r=5,4
  writeln ('c =', c:6:4);
  writeln ('s=', s:6:4)
  end.
  Результат работы программы:
  Turbo Pascal Version 7.0
  c =33.9120
  s =91.5624
  write('Введите r>>');
  readln(r);
  program n_1;
  const pi=3.14;
  var r, c, s: real;
  begin
  
  r:=5.4;
  
  c :=2*pi*r;
  s:=pi*r*r;
  
  Улучшенная программа
  Результат работы программы:
  Turbo Pascal Uersion 7.0
  Вычисление длины окружности и площади круга
  Введите r>> 8.5
  c =53.3800
  s =226.8650
  

• 6 слайд

  Числовые типы данных
  Стандартные функции языка Паскаль:
  

• 7 слайд

  Операции div и mod
  program n_4;
  var x, a, b, c, s: integer;
  begin
  writeln ('Нахождение суммы цифр трёхзначного числа');
  write ('Введите исходное число>>');
  readln (x);
  a:=x div 100;
  b:=x mod 100 div 10;
  c:=x mod 10;
  s:=a+b+c;
  writeln ('s= ', s)
  end.
  Трёхзначное число можно представить в виде следующей суммы: x = a·100 + b·10 + c, где а, b, с - цифры числа.
  Программа нахождения суммы цифр вводимого с клавиатуры целого трёхзначного числа.
  

• 8 слайд

  Символьный и строковый типы данных
  Функция ord преобразовывает букву в её числовой код.
  Символы – это все буквы и значки, которые есть на клавиатуре. Для ввода в программу символьных переменных необходимо указать для них символьный тип данных char.
  Функция chr преобразовывает числовой код символа в сам символ.
  Значением строковой величины (тип string) является произвольная последовательность символов, заключенная в апострофы.
  W
  chr
  87
  ord
  W
  %
  37
  %
  4
  52
  4
  S
  83
  S
  var c: string
  c:= chr(52)+chr(37)
  с
  4%
  

• 9 слайд

  Символьный и строковый типы данных
  program n_5;
  var a: char; kod: integer; b: string;
  begin
  writeln ('Код и строка');
  write ('Введите исходную букву>>');
  readln (a);
  kod:=ord(a);
  b:=chr(kod–1)+a+chr(kod+1);
  writeln ('Код буквы ', a, '-', kod);
  writeln ('Строка: ', b)
  end.
  Вывод на экран кода буквы, введённой с клавиатуры
  Вывод на экран строки из трёх букв.
  Каких?
  

• 10 слайд

  Исследование функций round, int и frac
  Выполните программу несколько раз для
  x {10,2; 10,8; –10,2; –10,8}.
  Какой будет тип результата каждой из этих функций?
  program n_3;
  var x: real;
  begin
  writeln ('Исследование функций round, int, frac');
  write ('Введите x>>');
  readln (x);
  writeln ('Округление - ', round(x));
  writeln ('Целая часть - ', int(x));
  writeln ('Дробная часть - ', frac(x))
  end.
  ?
  

• 11 слайд

  Задание: Определить расстояние на плоскости между двумя точками с заданными координатами 𝑴𝟏(𝒙𝟏,𝒚𝟏) и 𝑴𝟐 𝒙𝟐,𝒚𝟐 .
  Составьте программу по блок-схеме.
  
  
  
  НАЧАЛО
  Ввод x1,x2,y1,y2
  d= (𝒙𝟐−𝒙𝟏) 𝟐 + (𝒚𝟐−𝒚𝟏) 𝟐
  ВЫВОД S
  КОНЕЦ
  program dlina;
  end.
  var x1,x2,y1,y2: integer;
  begin
  d=sqrt(sqr(x2-x1))+sqrt(y2-y1));
  writeln(‘d=‘, d);
  write('ВВЕДИТЕ КООРДИНАТУ X1= ');
  readln(X1);
  write('ВВЕДИТЕ КООРДИНАТУ Y1= '); readln(Y1);
  write('ВВЕДИТЕ КООРДИНАТУ X2= '); readln(X2);
  write('ВВЕДИТЕ КООРДИНАТУ Y2= '); readln(Y2);
  

• 12 слайд

  Вопросы и задания
  Для заданного x вычислите у по формуле
  у = х3 + 2,5х2 – х +1.
  При этом:
  а) операцию возведения в степень использовать запрещено;
  б) в одном операторе присваивания можно использовать не более одной арифметической операции (сложение, умножение, вычитание);
  в) в программе может быть использовано не более пяти операторов присваивания.
  Подсказка: преобразуйте выражение к следующему
  виду: y =((x + 2,5)x –1)x +1.
  По заданным координатам точек А и В вычислите длину отрезка АВ.
  Известны длины сторон треугольника a, b, c.
  Напишите программу, вычисляющую площадь этого треугольника.
  Известны координаты вершин A, B, C треугольника.
  Напишите программу, вычисляющую площадь этого треугольника.
  Если сумма налога исчисляется в рублях и копейках, то налоговая служба округляет её до ближайшего рубля (до 50 копеек - с недостатком, свыше 50 копеек (включая 50) - с избытком).
  Используйте компьютер, чтобы ввести точную сумму налога и вывести, сколько следует уплатить.
  Исследуйте работу функции random, запустив многократно на выполнение программу:
  program n_8;
  var x, n: integer;
  begin
  writeln ('Исследование функции random');
  randomize (*для генерации различных случайных чисел
  при каждом запуске программы *);
  write ('Введите x>>');
  readln (x);
  write ('Введите n>>');
  readln (n);
  writeln ('random(', x, ')=', random(x));
  writeln ('random(', x, ')+', n, '=', random(x)+n)
  end.
  Как можно получить случайное число из промежутка (0; x)?
  Как можно получить случайное число из промежутка (0; x]?
  Как можно получить случайное число из промежутка (n; x + n)?
  Одна компания выпустила лотерейные билеты трёх разрядов: для молодежи, для взрослых и для стариков.
  Номера билетов каждого разряда лежат в пределах:
  для молодёжи - от 1 до 100;
  для взрослых - от 101 до 200;
  для стариков - от 201 до 250.
  С помощью компьютера выберите случайным образом лотерейный билет в каждом разряде.
  Запишите на языке Паскаль программу, которая для произвольного двузначного числа определяет:
  а) сумму и произведение его цифр;
  б) число, образованное перестановкой цифр исходного числа.
  Запишите на языке Паскаль программу, которая
  вычисляет сумму кодов букв в слове БАЙТ.
  Запишите на языке Паскаль программу, которая выводит на экран строку символов, коды которых равны 66, 69, 71, 73, 78.
  Разработайте программу, которая запрашивает три строковые величины – взаимосвязанные прилагательное, существительное и глагол, а затем печатает все варианты фраз с использованием введённых слов.
  Даны значения целочисленных переменных:
  a = 10, b = 20.
  Чему будет равно значение логической переменной rez после выполнения операции присваивания?
  а) rez:=(a=10) or (b>10)
  б) rez:=(a>5) and (b>5) and (a<20) and (b<30)
  в) rez:=( (not(a<15)) or (b>20)
  Составьте программу, вводящую true, если высказывание является истинным, и false в противном случае:
  а) сумма цифр трёхзначного числа x является чётным числом;
  б) треугольник со сторонами a, b, с является разносторонним.
  Идёт k-я секунда суток. Разработайте программу, которая по введённой k-й секунде суток определяет, сколько целых часов h и целых минут m прошло с начала суток.
  Например, если k =13257=3 х 3600 + 40 х 60 + 57,
  то h =3 и m = 40.
  Выведите на экран фразу: It is … hours … minutes.
  Вместо многоточий программа должна выводить значения h и m, отделяя их от слов ровно одним пробелом.
  Запишите на языке Паскаль программу, реализующую алгоритм работы кассира, выдающего покупателю сдачу (s) наименьшим количеством банкнот по 500 (k500), 100 (k100), 50 (k50) и 10(k10) рублей.
  

Практическая работа № 5

Создание линейных алгоритмов

Цель работы: научиться составлять линейные алгоритмы.

Содержание работы. 

Основные понятия.

1                     Алгоритм – это последовательность команд, предназначенная исполнителю, в результате выполнения которой он должен решить поставленную задачу.

2                     Дискретность — алгоритм должен представлять процесс решения задачи как последовательное выполнение некоторых простых шагов.

3                     Детерминированность (определѐнность) – каждая команда должна быть однозначно определена.

4                     Понятность — алгоритм должен включать только те команды, которые доступны исполнителю и входят в его систему команд.

5                     Завершаемость (конечность) — при корректно заданных исходных данных алгоритм должен завершать работу и выдавать результат за конечное число шагов.

6                     Массовость (универсальность). Алгоритм должен быть применим к разным наборам исходных данных.

7                     Результативность — завершение алгоритма определѐнными результатами.

8                     Безошибочность – это если алгоритм даѐт правильные результаты для любых допустимых исходных данных. 

9                     Под переменной будем понимать некоторую ячейку памяти, т. е. отдельное место для хранение одной константы.

10                 Формульно-словесный способ представления алгоритмов основан на задании инструкций о выполнении конкретных действий в четкой последовательности в сочетании со словесными пояснениями.     

11                 На алгоритмическом языке. Алгоритмический язык – совокупность правил и обозначений, использующиеся для записи алгоритма.     

12                 Графический способ (метод блок-схемы).     При таком представлении алгоритма, каждый этап отображается в виде геометрических фигур-блоков, форма которых зависит от выполняемой операции.    

Вычислительное действие или последовательность действий

Ввод-вывод в общем виде

Начало, конец  алгоритма

13                 Линейный      алгоритм –     это       алгоритм,       в          котором          блоки             выполняются последовательно сверху вниз от начала до конца.

14     Любая переменная имеет имя – идентификатор. По правилам языка Паскаль имя переменной должно начинаться с буквы и может содержать буквы (только латинские), цифры и знак подчеркивания. Длина имени – до 126 символов. 15     Арифметические действия и выражения в Паскале:                 ‒          «+» - сложение;                 ‒          «-» - вычитание;                 ‒          «*» - умножение;                 ‒          «/» - деление;                 ‒          mod - нахождение остатка от деления; ‒ div - деление нацело (находить остаток от деления и делить нацело можно только целые числа); ‒ для указания порядка действий используются только круглые скобки, их может быть несколько, главное, чтобы количество открывающихся скобок равнялось количеству закрывающихся;                 ‒          sqr(x) – возведение аргумента в квадрат;                 ‒          sqrt(x) – извлечение квадратного корня;                 ‒          abs(x) – модуль.  16                 Общий вид оператора присваивания: <Имя_переменной>:=<арифметическое выражение>. 17                 Для типов переменной слева и арифметического выражения справа от знака присваивания выполняются правила:                 ‒                                    если переменная вещественного типа, то арифметическое выражение может быть как целого, так и вещественного типа, выражение преобразуется к вещественному типу;                 ‒                                          если переменная слева целого типа, то арифметическое выражение только целочисленное.

Задание

1         Составить и записать алгоритм решения задачи в графическом и словесноформульном виде

2         Написать программу на языке Паскаль 

Исходные данные:

Даны два ненулевых числа. Найти сумму, разность, произведение и частное этих чисел

Решение:

1    Алгоритм в графическом и словесном виде:

 

1.    Начало;

2.    Ввод (X; Y);

3.    X := X * X;

4.    Y := Y * Y;

5.    S := X + Y;

6.    R := X – Y;

7.    P := X * Y;

8.    C := X / Y;

9.    Вывод (S; R; P; C); 10. Конец.

2    Программа на языке Паскаль:

program lin; var X, Y, S, R, P, C:real; begin

    write(‘Введите первое число  ’);     readln(X);

    write(‘Введите второе число  ’);     readln(Y);     X := X * X;

    Y := Y * Y;

    S := X + Y;     R := X – Y;     P := X * Y;     C := X / Y;

    writeln(‘Сумма квадратов Ваших чисел =  ’,  S);     writeln(‘Разность квадратов Ваших чисел =  ’,  R);     writeln(‘Произведение квадратов Ваших чисел =  ’,  P);     writeln(‘Частное квадратов Ваших чисел =  ’,  C); end.

Задания к практической работе.

1                     Даны длины ребер а, b, c прямоугольного параллелепипеда. Найти его объем и площадь поверхности 

2                     Дана длина ребра куба a. Найти его объем и площадь поверхности 

3                     Даны катеты прямоугольного треугольника а и b. Найти его гипотенузу c, площадь

S и периметр P  

4                     Дана длина L окружности. Найти ее радиус R и площадь S круга, ограниченного этой окружностью, учитывая, что            2R, aS R2 . В качестве значения π L

использовать 3.14.

5                     Дана площадь S круга. Найти его диаметр D и длину L окружности, ограничивающей этот круг, учитывая, что L 2R, aSR2 . В качестве значения π использовать 3.14.

6                     Найти значение функции y = 3 x⁶ — 6 x² — 7 при данном значении x.

7                     Найти значение функции y = 4(x—3)⁶ — 7(x—3)³ + 2 при данном значении x.

8                     Дано значение температуры T в градусах Цельсия. Определить значение этой же температуры в градусах Фаренгейта. Температура по Цельсию T_C и температура по

Фаренгейту T_F связаны следующим соотношением: Т^С  Т^{F 32}_ ⁵⁹

9                     Найти длину окружности L и площадь круга S заданного радиуса R:  В качестве значения π использовать 3.14.

10                 Даны переменные A, B, C. Изменить их значения, переместив содержимое A в C, C — в B, B — в A, и вывести новые значения переменных A,B, C.

11                 Известно, что X кг шоколадных конфет стоит A рублей, а Y кг ирисок стоит B рублей. Определить, сколько стоит 1 кг шоколадных конфет, 1 кг ирисок, а также во сколько раз шоколадные конфеты дороже ирисок.

12                 Дано значение температуры T в градусах Фаренгейта. Определить значение этой же температуры в градусах Цельсия. Температура по Цельсию T_C и температура по

Фаренгейту T_F связаны следующим соотношением: Т^С  Т^{F 32}_ ⁵⁹

13                 Поменять местами содержимое переменных A и B и вывести новые значения A и B.

14                 Даны переменные A, B, C. Изменить их значения, переместив содержимое A в B, B — в C, C — в A, и вывести новые значения переменных A, B, C.

15                 Основание прямой призмы – прямоугольный треугольник с катетами а и b. Высота призмы равна h. Найти площадь поверхности и объем призмы.

16                 Сторона основания правильной четырехугольной пирамиды равна а, а высота – h.

Найти площадь поверхности и объем пирамиды.

17                 Найти объем шара радиуса R и площадь его поверхности.

18                 Найти площадь поверхности и объем кругового цилиндра, радиус основания которого равен R, а высота h.

19                 Найти площадь осевого сечения прямого кругового конуса с радиусом основания R и образующей L.

20                 Найти площадь поверхности и объем прямого кругового конуса с радиусом основания R и высотой h.

21                 Сторона основания правильной треугольной пирамиды равна а, а высота – h.

Найти площадь поверхности и объем пирамиды.

22                 Сторона основания правильной шестиугольной пирамиды равна а, а высота – h.

Найти площадь поверхности и объем пирамиды.

23                 Сторона основания правильной треугольной призмы равна а. Высота призмы равна h. Найти площадь поверхности и объем призмы.

24                 Сторона основания правильной шестиугольной призмы равна а. Высота призмы равна h. Найти площадь поверхности и объем призмы.

25                 Даны длины ребер а, b, c прямоугольного параллелепипеда. Найти длину диагонали параллелепипеда

26                 Найти площадь поверхности прямого кругового усеченного конуса с радиусом оснований R₁, R₂ и высотой h.

27                 Найти объем прямого кругового усеченного конуса с радиусом оснований R₁, R₂ и образующей L.

28                 Координаты концов отрезка – (х₁, у₂) и (х₂, у₂). Вычислить координаты точки, делящей отрезок пополам.

29                 Найти объем шара, если площадь его поверхности равна S.

30                 Найти площадь поверхности и объем кругового цилиндра, высота которого равна h, а площадь осевого сечения – S.

ИНСТРУКЦИОННАЯ КАРТА

для проведения  практической работы № 5

Тема занятия: Создание линейных алгоритмов

Цель выполнения задания: научиться составлять линейные алгоритмы

Необходимо знать: основные формулы и правила записи алгоритма в графическом, словесно-формульном виде и программы на языке Паскаль

Необходимо уметь: применять основные формулы и правила записи алгоритма в графическом, словесно-формульном виде и программы на языке Паскаль

Оборудование (приборы, материалы, дидактическое обеспечение): методические рекомендации к выполнению работы; задание и инструкционная карта для проведения практического занятия

Компьютерные программы: программы Borland Pascal, Pascal ABC, Ms Word

Теория:  Для выполнения заданий по данной теме необходимо предварительно изучить теоретические материалы,  а также методические рекомендации к выполнению работы

Порядок выполнения задания, методические указания: - ознакомиться с теоретическими положениями по данной теме; - изучить схему решения задач; - выполнить задания практической работы; - сформулировать вывод 

Дополнительные задания:  Могут быть сформулированы по ходу занятия

Содержание отчета:   отчет по практической работе должен содержать: основные определения, рассуждения по решению задач, необходимые вычисления, ответ; вывод по работе

Контрольные вопросы:  1  Что такое алгоритм? 2  Свойства алгоритма  3  Способы представления алгоритма  4  Что такое линейный алгоритм?  5  Что такое переменная, для чего используется?  6  Что такое идентификатор?  7  Какие правила использования идентификаторов в Паскале?  8  Какие основные действия можно выполнять в программе и как они записываются?  9  Как выглядит оператор присваивания?  10  Каковы особенности работы оператора присваивания?

Литература:

1        Н. Угринович Информатика и информационные технологии –М. Бином 2003 г.

2        В.Ю. Микрюков Информация. Информатика. Компьютер. Информационные системы.

Сети Ростов-на-Дону. Феникс. 2007 г.

3        http://fvn2009.narod.ru

4        http://www.iiikt.narod.ru

5        http://book.kbsu.ru