05.03.13 Условный оператор. Составьте программу, определяющую, является ли число а кратным числу b. Var a, b: integer; Begin Writeln(введите два числа);

Презентация:



Advertisements
Похожие презентации
Ветвление Полное ветвление Если УСЛОВИЕ то КОМАНДА 1 иначе КОМАНДА 2; IF УСЛОВИЕ THEN КОМАНДА 1 ELSE КОМAНДА 2;
Advertisements

Pascal: Условный оператор. Условный оператор позволяет проверить некоторое условие и в зависимости от результатов проверки выполнить то или иное действие.
АЛГОРИТМ ВЕТВЛЕНИЯ ОПЕРАТОР ВЕТВЛЕНИЯ. Какая задача решается по этой программе? Program Z1: Var a,b,c: integer; Begin Write ( vv a,b:); Read (a,b); C:=(a+b)*(b-a);
Условный оператор Полная форма Неполная форма If условие Then оператор_1 If условие Then оператор Else оператор_2 Пример: Построить алгоритм вычисления.
Условный оператор. Алгоритм с ветвлением – это такой алгоритм, в котором осуществляется выбор одного из двух путей продолжения алгоритма. На TPascal данный.
Условный оператор в Паскале. 1. Полный условный оператор. 2. Неполный условный оператор. 3. Составные условия.
Алгоритм ветвления на PasclABC. 1. Определение разветвленного алгоритма Это алгоритм в котором в зависимости от некоторого условия выбирается путь следования.
Решение задач с использованием условного оператора. If then else.
Решение задач с условным оператором
Самостоятельная работа по теме «Условный переход».
Задача. Даны действительные числа A, B, C, D. Найти max(a,b,c), max(a,b,d), max(b,c,d). Написать программу решения задачи PROGRAM ex1; PROCEDURЕ Max (x,
Устный счет Язык программирования Pascal ABC Условные операторы.
P ASCAL ABC Разветвляющиеся вычислительные процессы.
1 Программирование на языке Паскаль Тема 2. Ветвления © К.Ю. Поляков,
Если прямо пойдешь, то… Ветвления на языке Pascal.
Во многих жизненных ситуациях принятие того или иного решения зависит от выполнения одного или нескольких условий. Виктор Михайлович Васнецов. Витязь.
Алгоритмические структуры 1.Линейный 2.Ветвление 3.Цикл.
21 ноября 2013 г. 10а класс. Оператор ветвления в полном варианте IF (условие) THEN (операторы) ELSE (операторы); условие - з- записывается с помощью.
Алгоритмические структуры Решение задач Искандарова А.Р. учитель информатики МБОУ СОШ 18 г.Уфа.
Условный оператор (ветвление) (урок 5). Ветвление Если то иначе кон If then begin end else begin end;
Транксрипт:

Условный оператор

Составьте программу, определяющую, является ли число а кратным числу b. Var a, b: integer; Begin Writeln(введите два числа); Read(a,b); If a mod b = 0 // mod определяет остаток от деления Then Writeln(a кратно b) Else Writeln(a не кратно b); End. Задание 1: Составьте программу, которая определяет является ли число четным.

Существование треугольника по трем сторонам Var a, b, c: integer; Begin Writeln(Длины сторон:); Read(a,b,c); If (a<b+c) and (b<a+c) and (c<a+b) Then Writeln(Треугольник существует) Else Writeln(Треугольник не существует); End. Задание 2: Определите по трем сторонам, является ли треугольник прямоугольным (th Пифагора)

Успехов!!!