Курс повышения квалификации
Курс профессиональной переподготовки
Курс профессиональной переподготовки
Видеолекция
1 слайд
Язык программирования Pascal
2 слайд
Повторение
Расскажите о программе
program Prim_2_2;
var y, x: integer;
begin
writeln ('Введите x:');
readln (x);
y:=15*x*x*x+6*x*x+18*x-29;
writeln ('y=',y);
readkey;
end.
// имя программы
// описание переменных
//начало
//вывод данных
// ввод данных
// вычисления
// вывод ответа
// задержка
// конец
3 слайд
Повторение
Найдите ошибку в программе
program ;
uses crt;
var a,b,c,d,f,p:integer;
begin
writeln('Введите 5 численных значений:');
readln(a,b,c,d,f );
p:=a+b+c+d+f;
writeln('p=',p);
readkey;
end.
4 слайд
Повторение
Найдите ошибку в программе
program Prim_2_1;
uses crt;
begin
writeln('Введите 5 численных значений:');
readln(a,b,c,d,f );
p:=a+b+c+d+f;
writeln('p=',p);
readkey;
end.
5 слайд
Повторение
Найдите ошибку в программе
program Prim_2_1;
uses crt;
var a,b,c,d,f,p:integer;
begin
writeln('Введите 5 численных значений:');
readln(a,b,c,d,f );
p=:a+b+c+d+f;
writeln('p=',p);
readkey;
end.
6 слайд
Повторение
Найдите ошибку в блок-схеме
конец
Ввод а, в
Р=х-у
Вывод S
начало
конец
Ввод х, у
Р:=х-у
Вывод Р
начало
7 слайд
Повторение
Найдите ошибку в блок-схеме
конец
Ввод а
условие
начало
Действие
да
нет
конец
Ввод а
Действие
начало
условие
да
нет
8 слайд
Составить программу, которая спрашивает
“Как Вас зовут?”
“В каком классе учитесь?”
“Сколько Вам лет?”.
Необходимо, чтобы в программе были заданы такие вопросы, а пользователь потом мог ввести свои данные.
9 слайд
10 слайд
Условный оператор в Pascal
11 слайд
Цель: научиться записывать условный оператор на языке Pascal
12 слайд
Если налево пойдешь,
то счастье найдешь.
Если направо пойдешь,
то богатым будешь.
Если прямо пойдешь,
то дом построишь.
13 слайд
Если налево пойдешь,
то счастье найдешь.
Если направо пойдешь,
то богатым будешь.
Если прямо пойдешь,
то дом построишь.
14 слайд
Составить блок-схему и написать программу решения следующей задачи:
Компьютер запрашивает: “Сколько вам лет?”. Если ответ больше 100, то отвечает: “Вы хорошо сохранились!”.
15 слайд
Синтаксис неполной формы ветвления на ЯП Pascal
if <условие> then
<оператор 1>;
ЕСЛИ УСЛОВИЕ ИСТИННО, ТО ВЫПОЛНЯЕТСЯ ДЕЙСТВИЕ, ИНАЧЕ НИЧЕГО НЕ ПРОИСХОДИТ
16 слайд
Составить блок-схему следующей задачи:
Компьютер запрашивает: “Сколько вам лет?”. Если ответ более 100, то отвечает: “Вы хорошо сохранились!”.
17 слайд
Составить блок-схему следующей задачи:
Компьютер запрашивает: “Сколько вам лет?”. Если ответ больше 100, то отвечает: “Вы хорошо сохранились!”.
В противном случае отвечает: “Вся жизнь впереди!”
18 слайд
Синтаксис полной формы ветвления на ЯП Pascal
if <условие> then
<оператор 1>
else
<оператор 2>;
Если условие, стоящее после IF истинно, то выполняется действие, стоящее после слова THEN, если условие ложно , то выполняется действие, стоящее после слова ELSE.
19 слайд
Работа в парах
Придумайте задачу и составьте блок-схему решения
20 слайд
Новые слова
if (иф) – если
then (зен) – то/тогда
else (элз) - иначе
if x>y then
writeln (x)
else
writeln(y);
Как читается?
если x>y то
выводим (x)
иначе
выводим (y);
Перед оператором ELSE «;» не ставится!
21 слайд
Составной оператор
begin <последовательность операторов> end;
Операторные скобки
if d=0 then
begin
x:= -b/2*a;
writeln(‘Корень уравнения = ’, x);
end;
22 слайд
Запишите условия
23 слайд
В качестве условий используются логические выражения
сложные — записанные с помощью логических операций.
простые — записанные с помощью операций отношения;
=, >=, <=, <, >, <>
and, or, not
if <условие1>or <условие2>then
<оператор 1>;
24 слайд
Используя составной оператор, упростите следующий фрагмент программы:
if a>b then c:=1;
if a<=b then c:=2;
if a<=b then c:=3;
if a>b then c:=4;
25 слайд
Глядя на фрагмент программы, запишите изречение известного мыслителя:
Begin
a:=1;
If a>0 then begin
writeln(‘Суть’); a:=a+2; end
else begin writeln(‘Изба’);
a:=a+3; end;
If a<2 then writeln(‘большая’)
else
begin writeln(‘жизни’);
a:=a-1; end;
If a=2 then begin
writeln(‘самому себя’);
a:=a*2;
end
else begin writeln(‘красна’);
a:=a*4; end;
If a=4 then writeln(‘найти’)
else writeln(‘углами’); end.
26 слайд
Написать программу на языке программирования Pascal.
Даны два неравных числа. Вывести на экран большее их этих чисел
27 слайд
Написать программу на языке программирования Pascal.
Заданное целое число будет выводиться в квадрате, если оно неотрицательное.
28 слайд
Написать программу на языке программирования Pascal.
Определить принадлежность точки x отрезку [a;b]
29 слайд
Написать программу на языке программирования Pascal.
Даны три неравных числа. Вывести на экран большее их этих чисел
30 слайд
Сегодня я узнал…
Было интересно…
Было трудно…
Я выполнял(а) задания…
Я могу объяснить следующие понятия…
…– это…
Я знаю следующее …
31 слайд
Написать программу на языке программирования Pascal.
Определить является ли треугольник:
Равносторонним
Равнобедренным
(значение сторон вводится с клавиатуры)
Учебник § 3.4 с. 129
32 слайд
Спасибо за
внимание!
6 271 221 материал в базе
«Информатика», Босова Л.Л., Босова А.Ю.
3.4.1. Условный оператор
Больше материалов по этой темеНастоящий материал опубликован пользователем Каштакова Анастасия Юрьевна. Инфоурок является информационным посредником и предоставляет пользователям возможность размещать на сайте методические материалы. Всю ответственность за опубликованные материалы, содержащиеся в них сведения, а также за соблюдение авторских прав несут пользователи, загрузившие материал на сайт
Если Вы считаете, что материал нарушает авторские права либо по каким-то другим причинам должен быть удален с сайта, Вы можете оставить жалобу на материал.
Удалить материалВаша скидка на курсы
40%Организация специальных мероприятий
Экспозиционная работа в школьном музее как направление краеведческой деятельности
Основы религиозных культур и светской этики
Оставьте свой комментарий
Авторизуйтесь, чтобы задавать вопросы.