«Своя игра» Ветвление в Паскале
Простая игра
Типы данных
Операторы
10
10
Да или нет?
20
Программы
30
20
10
30
20
40
10
Большая игра
50
20
30
40
40
50
30
50
40
50
Типы данных - 10
Вопрос:
Для чего служит идентификатор Var ?
Ответ:
Для описания переменных и их типов
Типы данных - 20
Вопрос:
Значением переменной этого типа может быть целое число из интервала от -32768 до 32767. Назовите тип переменной на языке Паскаль.
Ответ:
Integer
Типы данных - 30
Вопрос:
Переменные А и B целого типа. Какого типа будет переменная С, если С:=A/B?
Ответ:
Real
Типы данных - 40
Вопрос:
Чем характеризуется переменная?
- Именем, типом, значением. Именем, значением. Именем, типом.
- Именем, типом, значением. Именем, значением. Именем, типом.
- Именем, типом, значением.
- Именем, значением.
- Именем, типом.
Ответ:
Именем, типом.
Типы данных - 50
Вопрос:
Переменные этого типа принимают диапазон значений от 0 до 255
Ответ:
Byte
Операторы - 10
Вопрос:
Оператор вывода результатов на экран
Ответ:
Write, Writeln
Операторы - 20
Вопрос:
Назовите формы ветвления?
Ответ:
полное и неполное
Операторы - 30
Вопрос:
Назовите условные операторы на языке Паскаль и их значения.
Ответ:
If Then Else
Операторы - 40
Вопрос:
Что идет после оператора If ?
После оператора then и после else ?
Ответ:
- Условие. действие1 или последовательность действий. Действие2 или последовательность действий.
- Условие.
- действие1 или последовательность действий.
- Действие2 или последовательность действий.
Операторы - 50
Вопрос: Какой результат будет после выполнения фрагмента программы?
a:=10; b:=16; if ab then f:=a*a else f:=b*b; writeln(f);
Ответ: 256
Да или нет? - 10
Вопрос: Ветвящийся алгоритм подразумевает неоднократное повторение отдельных частей программы?
Ответ:
нет
Да или нет?- 20
Вопрос: if x0 then y:=7+2*x;
Это неполная форма ветвления?
Ответ:
Да
Да или нет? - 30
Вопрос:
Оператор CASE служит для создания линейных алгоритмов?
Ответ:
нет
Да или нет? - 40
Вопрос:
Верно ли записан оператор выбора? If оператор 1 then оператор 2 else оператор3
Ответ:
нет
Кот в мешке
«Великие имена»
Великие имена
Кто разработал язык программирования Паскаль?
Николаус Вирт
Программы - 10
Вопрос: Есть ли ошибка в записи:
If a
Ответ:
Да, есть. М ежду операторами If, then else не ставится ; .
If athen min:=a else min:=b;
Своя игра
«Жизнь замечательных людей»
Жизнь замечательных людей
Назовите фамилию компьютерного гения, представленного на картинке
Билл Гейтс
Программы - 30
Впишите пропущенные слова:
Program Primer;
a,b: integer;
Begin
… (a);
… a mod 2 = 0 then b:=a+1 ... b:=a-1;
Write (b);
End.
Ответ: var, readln, if, else
Программы - 40
Вопрос: Результатом выполнения фрагмента программы будет ….? … a:=7; b:=8; k:=5+a; if ab then k:=k*3 else k:=k-3; writeln (k);
Ответ:36
Программа -50
Составьте программу, которая по введенному числу (от 1 до 7) выводит названия основных цветов в природе.
Подсказка: Оператор Case
Цвета: (к, о, ж, з, г, с, ф)
Ребусы - 10
Ответ: Паскаль
Ребусы в Паскаль - 20
Ответ: Программа
Ребусы в Паскаль - 30
Ответ: Переменная
Ребусы в Паскаль - 40
Ответ: Условие
Ребусы в Паскаль - 50
Ответ: Присвоение
Большая игра
Великие имена программирования
Математические функции в Паскале
40
30
Практика
60
Великие имена программирования - 30
Вопрос: Российский программист, один из ведущих мировых специалистов в сфере информационной безопасности. Один из основателей, основной владелец и нынешний глава компьютерной компании, названной его фамилией.
Ответ: Евгений Касперский
Функции в Паскале - 40
Что означает функция mod ?
Ответ:
Остаток от деления
Практика -60
Вопрос: Составить программу, которая вводит целое число. Если введенное число положительное, то выводит текст «Привет!», в противном случае - текст «Пока!».
Подведение итогов
Домашнее задание: Перечислите все ошибки в программе:
Количество ошибок - 5 .
1. Название программы не должно начинаться с цифры.
2. при перечислении переменных используется запятая.
3. оператор ввода readln написан с ошибкой.
4. После команды begin не должно быть ; .
5 . Двоеточие после команды write(C), должно стоять ; .
Program 1Primer;
Var a: b: c; integer;
Begin;
Readlen (a,b);
C:=a+b;
Write (c):
End.
Спасибо за внимание!