Задание:
1. Задача. Найти наибольшее число из трех чисел (алгоритм с ветвлением). Составить блок-схему. Набрать программу в PascalABC.
2. Задание для самостоятельной работы: найти наименьшее из двух чисел. Составить блок-схему и протестировать в Паскале.
Порядок выполнения:
1. На рабочем столе найти значок и открыть программу PascalABC
2. Набрать код программы.
Код программы: Блок-схема:
Program Primer;
Var a, b ,c, max: integer;
Begin
Writeln (‘Введите три числа’);
Readln (a,b,c);
If a>b then
пр23.docx
Практическая работа №23
Тема: Разработка программы на языке Паскаль с использованием операторов ввода, вывода,
присваивания и простых ветвлений
Задание:
1. Задача. Найти наибольшее число из трех чисел (алгоритм с ветвлением). Составить блоксхему.
Набрать программу в PascalABC.
2. Задание для самостоятельной работы: найти наименьшее из двух чисел. Составить блоксхему и
протестировать в Паскале.
Порядок выполнения:
1. На рабочем столе найти значок
2. Набрать код программы.
и открыть программу PascalABC
Код программы: Блоксхема:
Program Primer;
Var a, b ,c, max: integer;
Begin
Writeln (‘Введите три числа’);
Readln (a,b,c);
If a>b then
max:=a
else
max:=b;
If c>max then
max:=c;
Writeln (‘Наибольшее ’, max);
End.
max:=
b
начало
a, b, c
a>b
c>max
max
конец
max:=
a
max:=
c
Кнопка запуска
программы
3. Для запуска программы нажать зеленую стрелку.
4.
Ввести три числа. После каждого ввода числа нажимать Enter.
Материалы на данной страницы взяты из открытых источников либо размещены пользователем в соответствии с
договором-офертой сайта. Вы можете
сообщить о нарушении.
Продолжая использовать наш сайт, вы соглашаетесь с политикой использования Cookies. Это файлы в браузере, которые помогают нам сделать ваш опыт взаимодействия с сайтом удобнее.