Условный оператор
Учитель информатики
ГБОУ гимназия №1517 г. Москва
Попова Маргарита Юрьевна
Тест «Язык Pascal»
Вопросы
- Перечислить типы данных.
- Назовите оператор ввода данных.
- Назовите оператор вывода данных.
- Как выглядит оператор присваивания?
Ответы:
INTEGER, LONGINT, REAL
READLN();
WRITELN();
:=
Тема урока: «Условный оператор»
Цели урока:
- научить учащихся решать задачи с использованием условного оператора в Паскаль;
- ввести понятие условного оператора.
THEN оператор1 ELSE оператор2; Краткая форма записи оператора: IF THEN оператор; " width="640"
Общий вид оператора
Полная форма записи оператора
IF условие THEN оператор1 ELSE оператор2;
Краткая форма записи оператора:
IF THEN оператор;
b " width="640"
Н аписать программу решения следующей задачи: Даны два числа не равные друг другу. Найти наибольшее из них и увеличить на 2.
program priumer;
var a,b,max: integer;
begin
writeln(‘Введите a,b’);
readln(a,b);
writeln(max);
end.
else
then
max:=a+2
max:=b+2;
if
ab
Практическая работа на ПК
Дано действительное число. Возвести его в квадрат, если оно неотрицательно и в четвертую степень, если отрицательно.
0 then b:=a*a else b:=a*a*a*a; writeln(b); end. " width="640"
Решение
program primer;
var a,b: integer;
begin
writeln(‘Введите a’);
readln(a);
If a0 then b:=a*a else b:=a*a*a*a;
writeln(b);
end.
Вычислить значение функции
program primer;
var x,y: integer;
begin
writeln(‘Введите x’);
readln(x);
If x
writeln(y);
end.
Домашнее задание
- Даны целые числа m, n. Если числа не равны, то заменить каждое из них одним и тем же числом, равным большему из исходных, а если равны, то заменить числа нулями.
Подведение итогов
- Как записывается оператор ветвления в Паскале?
- Что представляет собой полное ветвление(неполное) в Паскале?
Условный оператор
Учитель информатики
ГБОУ гимназия №1517 г. Москва
Попова Маргарита Юрьевна
Список использованных источников
- Информатика И ИКТ: учебник для 9 класса: в 2 ч. Ч.1/Л.Л. Босова, А.Ю. Босова. – 2-е изд. – М.: БИНОМ. Лаборатория знаний, 2013. – 248с. (Стр.198-202)
- http://img.wikinut.com/img/3266gmp7i-1vs858/jpeg/700x1000/Check-it-out.jpeg тест
- http://abc.vvsu.ru/Books/ebooks_iskt/%DD%EB%E5%EA%F2%F0%EE%ED%ED%FB%E5%F3%F7%E5%E1%ED%E8%EA%E8/%CF%E0%F1%EA%E0%EB%FC%CF%E5%F2%F0%C3%D3/petrsu.karelia.ru/psu/chairs/imo/pascal/image3.gif блок-схема
- http://www.rusmia.ru/images/stories/student_za_kompyterom.jpg ребенок с компьютером