Программа на языке Pascal program qq; var a, b, max: integer; begin writeln(\

Программа на языке Pascal program qq; var a, b, max: integer; begin writeln('Введите два целых числа'); read ( a, b )



НазваниеПрограмма на языке Pascal program qq; var a, b, max: integer; begin writeln('Введите два целых числа'); read ( a, b )
Дата конвертации24.10.2012
Размер13.71 Kb.
ТипПрограмма


Разветвляющиеся алгоритмы


Алгоритмы, в которых последовательность шагов зависит от выполнения некоторых условий, называются разветвляющимися.

Задача. Ввести два целых числа и вывести на экран наибольшее из них.


Полное ветвление


Блок-схема





Программа на языке Pascal

program qq;

var a, b, max: integer;

begin

writeln('Введите два целых числа');

read ( a, b );

if a > b then begin

end

else begin

end;

writeln ('Наибольшее число ', max);

end.


В общем виде

if <условие> then begin

{что делать, если условие верно}

end

else begin

{что делать, если условие неверно}

end;


Неполное ветвление


Блок-схема





Программа на языке Pascal

var a, b, max: integer;

begin

writeln('Введите два целых числа');

read ( a, b );

max := a;

if b > a then

max := b;

writeln ('Наибольшее число ', max);

end.


Сложные условия


Простые условия (отношения)

< <= > >= = <>

Сложное условие – это условие, состоящее из нескольких простых условий (отношений), связанных с помощью логических операций:

    • not – НЕ (отрицание, инверсия)

    • and – И (логическое умножение, конъюнкция,
      одновременное выполнение условий)

    • or – ИЛИ (логическое сложение, дизъюнкция,
      выполнение хотя бы одного из условий)

    • xor – исключающее ИЛИ (выполнение только
      одного из двух условий, но не обоих)


Порядок выполнения (приоритет = старшинство)

    • выражения в скобках

    • not

    • and

    • or, xor

    • <, <=, >, >=, =, <>

Особенность – каждое из простых условий обязательно заключать в скобки.



Похожие:

Программа на языке Pascal program qq; var a, b, max: integer; begin writeln(\Программа на Pascal. Простейшая программа program name; {имя программы} begin { начало программы } end. { конец программы}
Алгоритм – это понятное, точное предписание ведущее от исходных данных к получению результата
Программа на языке Pascal program qq; var a, b, max: integer; begin writeln(\Практикум Вывод текста на экран 1) Вывести на экран текст "лесенкой" Вася пошел гулять program vasya; begin writeln('Вася')

Программа на языке Pascal program qq; var a, b, max: integer; begin writeln(\Логические выражения pr 2 Практикум Логические выражения
Даны два целых числа: A, B. Проверить истинность высказывания: «Числа a и b имеют одинаковую четность»
Программа на языке Pascal program qq; var a, b, max: integer; begin writeln(\I основы языка высокого уровня турбо pascal алфавит языка Pascal
Прописные и строчные буквы Pascal'eм не различаются. Знаки «возведение в степень» и двойная кавычка в языке отсутствуют
Программа на языке Pascal program qq; var a, b, max: integer; begin writeln(\Основы программирования на языке Pascal Разделы программы
Текст программы начинается со служебного слова "begin" и заканчивается служебным словом "end", после которого ставится точка. В конце...
Программа на языке Pascal program qq; var a, b, max: integer; begin writeln(\Письменно в тетради
Укажите, какие последовательности символов являются правильными именами переменных: kom2t, 3comt, ram-5, p6, max, integer, a, cab...
Программа на языке Pascal program qq; var a, b, max: integer; begin writeln(\П/п Хар-ка Функ- ций Наиме- нование функций
Отрицание: Инверсия логичес-кой var истинна, если сама var лож-на, и, наоборот, инверсия ложна, если var, истинна
Программа на языке Pascal program qq; var a, b, max: integer; begin writeln(\B в формате integer, используя оператор if. Результат Х тоже целочисленный ( integer или longint ). Варианты 1) 2) 3) 4) 5) 6) 7) 8) 9) 10) 11) 12) Варианты заданий задача
Задача №1 Вычислить заданное целочисленное выражение для данных a, b в формате integer, используя оператор if. Результат Х тоже целочисленный...
Программа на языке Pascal program qq; var a, b, max: integer; begin writeln(\Документы
1. /pascal/Занятия/Семестр 1/COMPILER.TXT
2. /pascal/Занятия/Семестр...

Программа на языке Pascal program qq; var a, b, max: integer; begin writeln(\Тема : Анализ программы, содержащей подпрограммы, циклы и ветвления
Ниже записана программа. Получив на вход число, эта программа печатает два числа, и. Укажите наибольшее из таких чисел, при вводе...
Разместите кнопку на своём сайте:
Документы


База данных защищена авторским правом ©podelise.ru 2000-2014
При копировании материала обязательно указание активной ссылки открытой для индексации.
обратиться к администрации
Документы

Разработка сайта — Веб студия Адаманов