Инфоурок Информатика ПрезентацииПрезентация на тему:"Основы языка Visual Basic - разветвляющиеся алгоритмы"

Презентация на тему:"Основы языка Visual Basic - разветвляющиеся алгоритмы"

Скачать материал
Скачать материал "Презентация на тему:"Основы языка Visual Basic - разветвляющиеся алгоритмы""

Получите профессию

Интернет-маркетолог

за 6 месяцев

Пройти курс

Рабочие листы
к вашим урокам

Скачать

Методические разработки к Вашему уроку:

Получите новую специальность за 3 месяца

Микробиолог

Описание презентации по отдельным слайдам:

  • РАЗВЕТВЛЯЮЩИЕСЯ АЛГОРИТМЫОсновы языка программирования Visual Вasic

    1 слайд

    РАЗВЕТВЛЯЮЩИЕСЯ АЛГОРИТМЫ
    Основы языка программирования Visual Вasic

  • РАЗВЕТВЛЯЮЩИЙСЯ   АЛГОРИТМ ПРЕДПОЛАГАЕТ ВЫБОР ДЕЙСТВИЯ В ЗАВИСИМОСТИ ОТ ВЫПОЛ...

    2 слайд

    РАЗВЕТВЛЯЮЩИЙСЯ АЛГОРИТМ ПРЕДПОЛАГАЕТ ВЫБОР ДЕЙСТВИЯ В ЗАВИСИМОСТИ ОТ ВЫПОЛНЕНИЯ ПОСТАВЛЕННОГО УСЛОВИЯ
    Урок № 4

  • Условие – это логическая операция, ответом которой являются слова ИСТИНА (да)...

    3 слайд

    Условие – это логическая операция, ответом которой являются слова ИСТИНА (да) или ЛОЖЬ (нет)
    (СРАВНЕНИЕ)
    Знаки для записи условий: > , <, =, =>,=<,< >
    Для записи сложных условий используются логические связки
    OR (ИЛИ), AND (И), NOT (НЕ).

  • КОМАНДА ВЕТВЛЕНИЯ  ИМЕЕТ ПОЛНУЮ (1) ИЛИ СОКРАЩЕННУЮ ФОРМУ(2)-ОБХОДСерия 11Ус...

    4 слайд


    КОМАНДА ВЕТВЛЕНИЯ ИМЕЕТ ПОЛНУЮ (1) ИЛИ СОКРАЩЕННУЮ ФОРМУ(2)-ОБХОД
    Серия 1
    1
    Условие
    Серия 2
    Да
    Нет
    Да
    Нет
    Условие
    Серия 1
    2

  • В алгоритмическом языке:ПОЛНАЯ ФОРМАЕСЛИ   условие
ТО  серия1 
ИНАЧЕ серия2...

    5 слайд

    В алгоритмическом языке:
    ПОЛНАЯ ФОРМА
    ЕСЛИ условие
    ТО серия1
    ИНАЧЕ серия2
    ОБХОД
    ЕСЛИ условие
    ТО серия
    В Бейсике оператор условного ветвления записывается:
    If <условие>Then < серия1>Else < серия2 >
    Например:


    If а<> b Then Print “да” Else Print “нет”

  • НАЧАЛОВВОД A,BКОНЕЦВЫВОД MA&gt;BM:=AM:=BДаНетКакую задачу решает данный алгоритм?

    6 слайд

    НАЧАЛО
    ВВОД A,B
    КОНЕЦ
    ВЫВОД M
    A>B
    M:=A
    M:=B
    Да
    Нет
    Какую задачу решает данный алгоритм?

  • Практическое задание.Задачу «Знакомство» изменить так, чтобы вместо возраст...

    7 слайд

    Практическое задание.


    Задачу «Знакомство» изменить так, чтобы вместо возраста человека выводился комментарий о его возрастной принадлежности

  • Dim nm As String, gd, vz As IntegerPrivate Sub Command1_Click()nm = InputBo...

    8 слайд

    Dim nm As String, gd, vz As Integer
    Private Sub Command1_Click()
    nm = InputBox("Здравствуй! Как тебя зовут?", "Знакомство")
    Print "Привет, "; nm; "!"
    gd = InputBox("В каком году ты родился?", "Знакомство")
    vz = 2013 - Val(gd)
    Print "Тебе, "; nm; ", "; vz; "лет"

    If vz<10 Then Print “Да ты, “ nm “, ещё ребёнок!”
    If (vz>9) and (vz<18) Then Print “Ты, “nm “, уже подросток!” ……………….
    End Sub

  • Повторение изученного1. Когда используют разветвляющиеся алгоритмы?Урок № 52....

    9 слайд

    Повторение изученного
    1. Когда используют разветвляющиеся алгоритмы?
    Урок № 5
    2. Как записать оператор условного ветвления?
    If <условие> Then <серия1> Else <серия2>

  • Дано число. Вывести это число и определить, является оно положительным или от...

    10 слайд

    Дано число. Вывести это число и определить, является оно положительным или отрицательным, целым или не целым
    В случае, если число целое, определить, чётное оно или нечётное, однозначное или многозначное
    Практическое задание

  • 1 условие (положительное или отрицательное)2 условие (целое или не целое)3 ус...

    11 слайд

    1 условие (положительное или отрицательное)
    2 условие (целое или не целое)
    3 условие (чётное или нечётное)
    X>0
    Int(X)=x
    X/2=X\2
    4 Условие (однозначное или многозначное)
    САМОСТОЯТЕЛЬНО
    X mod 2=0

  • Какой тип данных нужен для  переменной под число?Dim x As single

    12 слайд

    Какой тип данных нужен для переменной под число?
    Dim x As single

  • началоконецВвод числа ХВывод «Анализ выполнен»Х&gt;0Вывод «Отриц»Вывод « Полож»I...

    13 слайд

    начало
    конец
    Ввод числа Х
    Вывод «Анализ выполнен»
    Х>0
    Вывод «Отриц»
    Вывод « Полож»
    Int(Х)=x
    Вывод «Не цел»
    Вывод « Целое»
    x/2=x\2
    Вывод «Не чётное»
    Вывод « Чётное»
    Х mod 2=0
    : Goto 1
    1
    Private Sub Command1_Click()

    End Sub
    х = Val(InputBox(“Введите любое число"))
    If X>0 Then Print “Положител” Else Print “Отрицат”
    Print “Анализ выполнен”

  • Даны 3 числа.  Может ли существовать треугольник с  такими сторонами?1 услови...

    14 слайд

    Даны 3 числа. Может ли существовать треугольник с такими сторонами?
    1 условие (существование треугольника)
    a+b>c и a+c>b и b+c> a
    a
    b
    c
    (a+b>c) and (a+c>b) and (b+c> a)
    Урок № 6
    Практическое задание

  • Если треугольник существует, определить:а) является ли он прямоугольным? А=...

    15 слайд

    Если треугольник существует, определить:
    а) является ли он прямоугольным?

    А=В=С
    А=В или В=С или С=А
    Б) Является ли он равносторонним?
    в) является ли он равнобедренным?

    2 условие (признак прямоугольного треугольника)
    a2+b2=c2 или b2+c2=a2 или a2+c2=b2
    (a*а+b*b=c*c)

  • началоконецВвод чисел a,b,cВывод «Анализ выполнен»Услов1Вывод «несущ.»Вывод «...

    16 слайд

    начало
    конец
    Ввод чисел a,b,c
    Вывод «Анализ выполнен»
    Услов1
    Вывод «несущ.»
    Вывод «Существ.»
    усл2
    Вывод «Не прямоуг»
    Вывод «прямоуг»
    усл3
    Вывод «Не равнобсторон»
    Вывод
    « равносторон»
    : Goto 1
    1
    : Goto 1

  • Private Sub Command1_Click() a = Val(InputBox(“ Введите 1 сторону”)) b = …...

    17 слайд


    Private Sub Command1_Click()
    a = Val(InputBox(“ Введите 1 сторону”))
    b = ……..
    c = ………
    If (a+b>c) and (a+c>b) and (b+c> a)
    Then Print “треугольник существует" Else Print “треугольник не существует ": GoTo 1
    ………………………………………

    1 Print “Анализ закончен”
    End Sub
    Dim a, b, c As single

Получите профессию

Экскурсовод (гид)

за 6 месяцев

Пройти курс

Рабочие листы
к вашим урокам

Скачать

Скачать материал

Найдите материал к любому уроку, указав свой предмет (категорию), класс, учебник и тему:

6 626 391 материал в базе

Скачать материал

Другие материалы

Вам будут интересны эти курсы:

Оставьте свой комментарий

Авторизуйтесь, чтобы задавать вопросы.

  • Скачать материал
    • 07.02.2017 1155
    • PPTX 465.5 кбайт
    • 12 скачиваний
    • Оцените материал:
  • Настоящий материал опубликован пользователем Пивоварова Елена Александровна. Инфоурок является информационным посредником и предоставляет пользователям возможность размещать на сайте методические материалы. Всю ответственность за опубликованные материалы, содержащиеся в них сведения, а также за соблюдение авторских прав несут пользователи, загрузившие материал на сайт

    Если Вы считаете, что материал нарушает авторские права либо по каким-то другим причинам должен быть удален с сайта, Вы можете оставить жалобу на материал.

    Удалить материал
  • Автор материала

    • На сайте: 9 лет и 5 месяцев
    • Подписчики: 0
    • Всего просмотров: 47983
    • Всего материалов: 13

Ваша скидка на курсы

40%
Скидка для нового слушателя. Войдите на сайт, чтобы применить скидку к любому курсу
Курсы со скидкой

Курс профессиональной переподготовки

Секретарь-администратор

Секретарь-администратор (делопроизводитель)

500/1000 ч.

Подать заявку О курсе

Курс профессиональной переподготовки

Информационные системы и технологии: теория и методика преподавания в профессиональном образовании

Преподаватель информационных систем и технологий

300/600 ч.

от 7900 руб. от 3950 руб.
Подать заявку О курсе

Курс повышения квалификации

Организация преподавания информационных систем и технологий в профессиональном образовании

36 ч. — 180 ч.

от 1700 руб. от 850 руб.
Подать заявку О курсе
  • Сейчас обучается 31 человек из 20 регионов

Курс повышения квалификации

Методика преподавания информатики в начальных классах

72 ч. — 180 ч.

от 2200 руб. от 1100 руб.
Подать заявку О курсе

Мини-курс

Литературные пути: от биографий к жанрам

4 ч.

780 руб. 390 руб.
Подать заявку О курсе

Мини-курс

Дизайн и визуальная коммуникация

4 ч.

780 руб. 390 руб.
Подать заявку О курсе

Мини-курс

Мастерство влияния и успешных переговоров

4 ч.

780 руб. 390 руб.
Подать заявку О курсе
  • Сейчас обучается 26 человек из 15 регионов