Урок № 4
(СРАВНЕНИЕ)
Знаки для записи условий: > , <, =, =>,=<,< >
Для записи сложных условий используются логические связки
OR (ИЛИ), AND (И), NOT (НЕ).
В Бейсике оператор условного ветвления записывается:
If <условие>Then < серия1>Else < серия2 >
Например:
If а<> b Then Print “да” Else Print “нет”
If vz<10 Then Print “Да ты, “ nm “, ещё ребёнок!”
If (vz>9) and (vz<18) Then Print “Ты, “nm “, уже подросток!” ……………….
End Sub
If <условие> Then <серия1> Else <серия2>
В случае, если число целое, определить, чётное оно или нечётное, однозначное или многозначное
Практическое задание
X>0
Int(X)=x
X/2=X\2
4 Условие (однозначное или многозначное)
САМОСТОЯТЕЛЬНО
X mod 2=0
If X>0 Then Print “Положител” Else Print “Отрицат”
Print “Анализ выполнен”
a+b>c и a+c>b и b+c> a
a
b
c
(a+b>c) and (a+c>b) and (b+c> a)
Урок № 6
Практическое задание
Б) Является ли он равносторонним?
в) является ли он равнобедренным?
2 условие (признак прямоугольного треугольника)
a2+b2=c2 или b2+c2=a2 или a2+c2=b2
(a*а+b*b=c*c)
1 Print “Анализ закончен”
End Sub
Dim a, b, c As single
Это сайт презентаций, где можно хранить и обмениваться своими презентациями, докладами, проектами, шаблонами в формате PowerPoint с другими пользователями. Мы помогаем школьникам, студентам, учителям, преподавателям хранить и обмениваться учебными материалами.
Email: Нажмите что бы посмотреть