Твельнева Т.А. МОУ СОШ №1
1. Оператор вывода языка Паскаль может быть записан: |
1) write |
2) readln |
3) var |
4) begin |
2. Какая из записей является правильной? |
1) read(a;b) |
2) read a,b |
3) read(a,b) |
4) read a;b |
Тест- разминка
Твельнева Т.А. МОУ СОШ №1
3. Укажите правильную запись на языке Паскаль: переменные S,a,b вещественного типа |
1) Var S,a,b: integer; |
2) Var S,a,b: Real; |
3) Var S;a;b: real; |
4) Var S,a,b: boolean; |
4. Укажите правильную запись на языке Паскаль: вывод P,x |
1) write(P,x) |
2) readln(P,x) |
3) write P,x |
4) Write(P;x) |
Твельнева Т.А. МОУ СОШ №1
5. Укажите верную запись выражения на языке Паскаль: a=2х+5 |
1) a=2x+5 |
2) a:=2x+5 |
3) a:=2*x+5 |
4) a=2*x+5 |
Твельнева Т.А. МОУ СОШ №1
В отличие от линейных алгоритмов, в которых команды выполняются одна за другой , в алгоритмическую структуру «ветвление» входит «условие», в зависимости от выполнения или невыполнения которого реализуется та или иная последовательность команд (серия)
повторение
Алгоритмическая структура «ветвление»
Твельнева Т.А. МОУ СОШ №1
Алгоритмический язык
если <условие>
то <серия 1>
иначе <серия 2>
кв
Язык блок-схем
да нет
повторение
КОМАНДА ВЕТВЛЕНИЯ
Твельнева Т.А. МОУ СОШ №1
Найти большее из двух чисел А и В. Результат обозначить С.Заполните пропущенные места.
алг БИД
вещ …
нач
ввод …
Язык блок-схем
да нет
повторение
Задача_1.
Твельнева Т.А. МОУ СОШ №1
алг БИД 1
вещ А,В,С
нач
ввод А,В
Язык блок-схем
да нет
C:=B
Задача_1.
Найти большее из двух чисел А и В. Результат обозначить С.
Твельнева Т.А. МОУ СОШ №1
В языке Паскаль имеется оператор ветвления. Другое его название – условный оператор. Формат полного оператора следующий:
if <логическое выражение>
then <оператор1>
else <оператор2>;
Здесь if – если, then - то, else- иначе.
Твельнева Т.А. МОУ СОШ №1
Алгоритмический язык
если <условие>
то <серия 1>
иначе <серия 2>
кв
Язык Паскаль
(полное ветвление)
IF <условие>
THEN<оператор_1>
ELSE <оператор_2>;
сравни и запиши в тетрадь
Твельнева Т.А. МОУ СОШ №1
Алгоритмический язык
если <условие>
то <серия 1>
кв
Язык Паскаль
(неполное ветвление)
IF <условие>
THEN<оператор> ;
запиши в тетрадь
Твельнева Т.А. МОУ СОШ №1
РЕШЕНИЕ ЗАДАЧ
Запишем алгоритм Задачи_1 на языке Паскаль,
используя полное ветвление
Твельнева Т.А. МОУ СОШ №1
алг БИД 1
вещ А,В,С
нач
ввод А,В
если А>B
то C:=A
иначе C:=B
кв
вывод С
кон
Program BID1;
Var A,B,C:real;
Begin
Write( ‘A=‘);readln (A);
запиши в тетрадь
Твельнева Т.А. МОУ СОШ №1
Запишем алгоритм Задачи_1 на языке Паскаль, используя неполное ветвление
алг БИД 2
вещ А,В,С
нач
ввод А,В
C:=A
если B>A
то C:=B
кв
вывод С
кон
Program BID2;
Var A,B,C:real;
Begin
Write( ‘A=‘);readln (A);
запиши в тетрадь
Твельнева Т.А. МОУ СОШ №1
Набрать программу решения задачи_1 на компьютере. Протестировать её.
(1 балл)
Задача 2. Изменить программу, чтобы вычислялось меньшее из двух чисел. Протестировать.
(2 балла)
Задача 3. Составить и протестировать программу, вычисляющую большее(меньшее) из трёх чисел. Протестировать.
( 3 балла)
Практическая работа
Твельнева Т.А. МОУ СОШ №1
Запустить программу
Turbo Pascal
2. В открывшемся окне набрать текст программы
3. Запустить программу на выполнение командой RUN
4. Ввести с клавиатуры значения А и В.
Проанализировать результат.
5. Изменить программу для решения задачи 2 или задачи 3. Отладить программу.
Ход работы
Материалы на данной страницы взяты из открытых источников либо размещены пользователем в соответствии с договором-офертой сайта. Вы можете сообщить о нарушении.