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

П

Члены команды:

1.____________________ ____

2.____________________ ___

3.____________________ ____

4.____________________ ____

5.____________________ ____

утевой лист команды

Задание 1. Какие данные относятся к типу
INTEGER?

_________________________________________________________

Задание 2. При каких значениях Х
следующее равенство будет правильным?

Х div 5 =8

Задание 3. Определите, что будет выведено на экран после выполнения следующих операторов:

Задание 4. Дана серия операторов:

n:=3*n;
n:=3-n;
n:=n*n;

После выполнения этой серии переменная n
получила значение 0.
Найдите начальное значение этой переменной.

Задание 5. Дана программа.
Исправьте ошибки и запишите, что будет выведено на экран.

Program 2 pr;
Var b,S: integer;
Begin
a:=10;

b:=12;

Writeln(Стороны прямоугольника’,а,’и’,b)
S=a*b;
Write ( ‘Площадь =’,S);
End

Путевой лист команды 2

Члены команды:

1.________________ ________

2._________________ _______

3.__________________ ______

4.__________________ ______

5.___________________ _____

Задание 1. Какие данные относятся к типу
REAL?

_________________________________________________________

Задание 2. При каких значениях Х
следующее равенство будет правильным?

50 div X =7

Задание 3. Определите, что будет выведено на экран после выполнения следующих операторов:

Задание 4. Дана серия операторов:

n:=3*n;
n:=3-n;
n:=n*n;

После выполнения этой серии переменная n
получила значение 0.
Найдите начальное значение этой переменной.

Задание 5. Дана программа.
Исправьте ошибки и запишите, что будет выведено на экран.

Program 2 pr;
Var b,S: integer;
Begin
a:=10;

b:=12;

Writeln(Стороны прямоугольника’,а,’и’,b)
S=a*b;
Write ( ‘Площадь =’,S);
End

П

Члены команды:

1.___________________ _____

2.___________________ _____

3.____________________ ____

4.____________________ ____

5.____________________ ____

утевой лист команды

Задание 1. Какие данные относятся к типу
STRING?

_________________________________________________________

Задание 2. При каких значениях Х следующее
равенство будет правильным?

50 mod X = 7

Задание 3. Определите, что будет выведено на экран
после выполнения следующих операторов:

Задание 4. Дана серия операторов:

n:=3*n;
n:=3-n;
n:=n*n;

После выполнения этой серии переменная n
получила значение 0.
Найдите начальное значение этой переменной.

Задание 5. Дана программа.
Исправьте ошибки и запишите, что будет выведено на экран.

Program 2 pr;
Var b,S: integer;
Begin
a:=10;

b:=12;

Writeln(Стороны прямоугольника’,а,’и’,b)
S=a*b;
Write ( ‘Площадь =’,S);
End

Оценка работы команды_________________________

Государственное общеобразовательное учреждение средняя общеобразовательная школа №425 имени академика П.Л.Капицы Кронштадтского района Санкт-Петербурга

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

Тема: Данные. Типы данных. Диалоговые программы

Урок №3

10 класс

Учитель высшей квалификационной категории
Тарасова Елена Евгеньевна

2010

Урок №3

Тема: Данные. Типы данных. Диалоговые программы.

Тип урока: комбинированный урок

Цели урока:

1. Познавательная:

• познакомить учеников с принципами создания простейших диалоговых программ в языке программирования Паскаль;

• научить применять команды ввода-вывода и присваивания при составлении программ.

1. Развивающая:

• учить анализировать и сравнивать.

1. Воспитательная:

• способствовать формированию партнерских отношений в классе.

Оборудование:

• мультимедийный проектор;

• интерактивная доска;

• презентация;

• карточки - задания.

Структура урока:

1. Организационный момент.

2. Актуализация опорных знаний и умений: повторение сформированных умений и навыков, проведение проверочных упражнений.

3. Мотивация. Сообщение цели и темы урока.

4. Введение нового материала, выполнение заданий на их освоение.

5. Первичное восприятие нового материала: тренировочные упражнения по алгоритму.

6. Выполнение заданий на применение полученных знаний.

7. Рефлексия. Задание на дом.

8. Подведение итогов урока.

2

«Аналитическая машина не претендует на изобретение чего-либо. Она может делать все то, что мы сумеем ей приказать»

Ада Лавлейс, 1844 г.

первая женщина-программист

Здравствуйте!

Задание 1

Какие данные относятся к типу :

INTEGER REAL STRING

456 -405 Паскаль 78.3

Y 456.0 10 класс 34

-0.1 Школа 0 -78.67

Задание 2

При каких значениях Х следующие равенства будут правильными?

Х div 5 = 8

50 div X = 7

50 mod X = 7

Задание 3

Определите, что будет выведено на экран после выполнения следующих операторов :

X:=2.75;

Y:=3;

Z:=-(x-y)/0.5;

Writeln(‘Z=’,Z);

X:=2;

Y:=3;

Z:=(x+y)/0.5;

Writeln(Z);

X:=75;

Y:=3;

Z:=(x-y)/2;

Writeln(‘ Ответ :’,Z);

Задание 4

Дана серия операторов :

n:=3*n;

n:=3-n;

n:=n*n;

После выполнения этой серии переменная n получила значение 0.

Найдите начальное значение этой переменной.

Задание 5

Дана программа.

Исправьте ошибки и запишите, что будет выведено на экран.

Program 2 pr; Var b,S: integer; Begin a:=10;

b:=12;

Writeln (Стороны прямоугольника ’, а ,’ и ’,b)

S=a*b; Write ( ‘ Площадь =’,S); End

Задание 1

Какие данные относятся к типу :

INTEGER REAL STRING

456 -405 Паскаль 78.3

Y 456.0 10 класс 34

-0.1 Школа 0 -78.67

Задание 2

При каких значениях Х следующие равенства будут правильными?

Х div 5 = 8

50 div X = 7

50 mod X = 7

Х=40,41,42,43,44

Х=7

Х=43

Задание 3

Определите, что будет выведено на экран после выполнения следующих операторов :

Z=0.5

10

X:=2.75;

Y:=3;

Z:=-(x-y)/0.5;

Writeln(‘Z=’,Z);

X:=2;

Y:=3;

Z:=(x+y)/0.5;

Writeln(Z);

Ответ:36

X:=75;

Y:=3;

Z:=(x-y)/2;

Writeln(‘ Ответ :’,Z);

Задание 4

Дана серия операторов :

n:=3*n;

n:=3-n;

n:=n*n;

N=1

После выполнения этой серии переменная n получила значение 0.

Найдите начальное значение этой переменной.

Задание 5

Дана программа.

Program 2 pr; Var b,S: integer; Begin a:=10;

b:=12;

Writeln (Стороны прямоугольника ’, а ,’ и ’,b)

S=a*b; Write ( ‘ Площадь =’,S); End

Стороны прямоугольника 10 и 12

Площадь=120

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

Организация диалога пользователя и компьютера. Оператор ввода данных.

Оператор ввода

read ( список переменных);

readln ( список переменных);

read ( a ); { ввод значения переменной a}

read ( a, b ); { ввод значений переменных a и b}

Как вводить два числа?

через пробел:

25 30

через Enter :

25

30

a

25

b

30

a

25

b

30

15

15

Этапы выполнения задания

Переменные a, b

• Определение исходных данных

II. Определение результатов

Переменная S

III. Алгоритм решения задачи.

• Ввод исходных данных
• Вычисление площади прямоугольника
• Вывод результата.

S=a*b

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

Все переменные имеют тип Integer

V. Программа

VI. Тестирование программы

Проверка работы программы для различных исходных данных

15

15

Полное решение

program pr;

var a, b, s: integer;

begin

writeln(' Введите длины сторон прямоугольника ');

readln ( a, b );

s:= a * b;

writeln(‘ Площадь прямоугольника= ‘,s);

end.

компьютер

Протокол :

Введите длины сторон прямоугольника

25 30

Площадь прямоугольника=750

пользователь

15

15

Задания

«1 бонус»: Ввести три числа, найти их сумму и произведение.

Пример:

Введите три числа:

4 5 7

4+5+7=16

4*5*7=140

«2 бонуса»: Ввести три числа, найти их сумму, произведение и среднее арифметическое.

Пример:

Введите три числа:

4 5 7

4+5+7=16

4*5*7=140

(4+5+7) / 3 =5.33

15

15

было легко и все понятно

возникли трудности, которые я преодолеваю

работать было трудно, много непонятного

15

15

Задания

«1 бонус»: Ввести три числа, найти их сумму и произведение.

Пример:

Введите три числа:

4 5 7

4+5+7=16

4*5*7=140

«2 бонуса»: Ввести три числа, найти их сумму, произведение и среднее арифметическое.

Пример:

Введите три числа:

4 5 7

4+5+7=16

4*5*7=140

(4+5+7) / 3 =5.33

15

15

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

П. Г. Антокольский

• П. Г. Антокольский
• П. Г. Антокольский
• П. Г. Антокольский
• П. Г. Антокольский