Программирование ветвлений на Паскале

Сентябрь 6, 2022

Главная
Алгебра
Программирование ветвлений на Паскале

Содержание

2. ПРОГРАММИРОВАНИЕ ВЕТВЛЕНИЙ НА ПАСКАЛЕ * Тема урока:
3. позволяет выбрать те или иные части программы в зависимости от условий Z:= X Z:= Y X>Y
4. Полная форма условного оператора If then else ; Program My2; Var x,y: integer; Begin Writeln (‘Введите
5. В Паскале допускаются следующие логические выражения > - больше => - больше или равно = -
6. В Паскале допускаются следующие логические операции. and и (конъюнкция) or или (дизъюнкция) not не (отрицание)
7. Неполная форма условного оператора If then ; Пусть даны два числа. Если первое больше второго по
8. Напишите фрагмент программы, подсчитывающих сумму только положительных из трёх данных чисел. Дано трехзначное число. Напишите программу
9. Запиши условный оператор, в которой значение переменной с вычисляется по формуле: a+b, если а –нечетное и
10. который вычисляет значение функции: If a >3 then y:=x2+5 else y:=x- 8;
12. Скачать презентацию

Слайд 2

ПРОГРАММИРОВАНИЕ ВЕТВЛЕНИЙ НА ПАСКАЛЕ
*
Тема урока:

Слайд 3

позволяет выбрать те или иные части программы в зависимости от условий
Z:=

X

Z:= Y

X>Y

Слайд 4

Полная форма условного оператора
If <логическое выражение> then <оператор 1>
else

<оператор 2>;
Program My2;
Var x,y: integer;
Begin
Writeln (‘Введите два числа’)
Readln( х, у);
If x>y Then Writeln(x)
else Writeln(y);
End.

Слайд 5

В Паскале допускаются следующие логические выражения
< - меньше
> - больше
<= -

меньше или равно
=> - больше или равно
= - равно
<> - не равно

Слайд 6

В Паскале допускаются следующие логические операции.
and и (конъюнкция)
or или (дизъюнкция)
not не

(отрицание)

Слайд 7

Неполная форма условного оператора
If <логическое выражение>
then <оператор 1> ;

Пусть даны два числа. Если первое больше второго по абсолютной величине, то необходимо уменьшить первое в пять раз. Иначе число оставить без изменения.

Program My3;
var x, y: real;
Begin
writeln (‘Введите числа х и у’);
readln (x,y);
If abs(x) >abs(y) Then x:=x/5;
Write(‘x=‘, x, ‘y=‘, y);
end.

Слайд 8

Напишите фрагмент программы, подсчитывающих сумму только положительных из трёх данных чисел.

Дано трехзначное число. Напишите программу определения, является ли оно полидромом («перевертышем»)

Слайд 9

Запиши условный оператор,
в которой значение переменной с вычисляется по формуле:

a+b, если а –нечетное и a*b, если а – четное.

If a div 2=0 then Write (‘Число чётное’) else write (‘Число нечетное’);

Слайд 10

который вычисляет значение функции:
If a >3 then y:=x2+5
else y:=x- 8;