Презентация - Логические выражения в Паскале

Слайд 1

Логические выраженияв Паскале
Автор: Купцова Е.В., учитель информатики и ИКТ МБОУ «Шенкурская СОШ», г. Шенкурск Архангельской области

Слайд 2

Логическое выражение - логическая формула, записанная на языке программирования. 1) состоит из логических операндов 2) связаны логическими операциями и круглыми скобками 3) результат вычисления - булевская величина (false или true)

Слайд 3

Логические операнды: логические константы (true или false) 2) переменные (описываются с типом boolean) 3) логические функции 4) операции отношения (сравнение двух операндов и определение истинности или ложности отношения между ними)

Слайд 4

Логические операции: not – отрицание 2) and - логическое умножение 3) or - логическое сложение 4) xor - "исключающее ИЛИ"

Слайд 5

Порядок действий: 1) not 2) and 3) or, xor

Слайд 6

Логическая функция odd(x) принимает значение true, если значение целого аргумента x - нечётное, иначе - false.

Слайд 7

Вычислительные задачи
Дана длина ребра куба. Найти площадь грани, площадь полной поверхности и объём этого куба. 2. Найти сумму членов арифметической прогрессии, если из­вестны ее первый член, разность и число членов прогрессии.
Практическая часть урока(написать программы в среде программирования PascalABC.Net)
Решение №1
Решение №2

Слайд 8

program kub; var a, Sg, Sp, v: real; begin write ('a='); read (a); Sg:=sqr(a); Sp:=6*Sg; v:=a*a*a; writeln ('Sg=', Sg); writeln ('Sp=', Sp); writeln ('v=', v); end.

Слайд 9

program progressiya; var a1, d, n, s: real; begin write ('a1='); read (a1); write ('d='); read (d); write ('n='); read (n); s:=(2*a1+d*(n-1))*n/2; writeln ('s=', s); end.

Слайд 10

Задачи на составление логических выражений
3. Треугольник со сторонами a, b, c является равносторонним. 4. Данные числа c и d являются соответственно квадратом и кубом числа a.
Решение №3
Решение №4

Слайд 11

program treug_ravnost; var a,b,c: real; begin writeln('Введите a, b и c'); readln(a,b,c); if (a=b) and (a=c) and (b=c) then writeln('Треугольник равносторонний') else writeln('Треугольник не равносторонний'); end.

Слайд 12

program kvadrat_kub_chisla; var a,d,c: real; begin writeln('Введите a, d и c'); readln(a,d,c); if (c=a*a) and (d=a*a*a) then writeln('true') else writeln('false'); end.

Слайд 13

Д/З
Читать п. 2.2.3, в. 6 письменно