Первые шаги — Pascal ABC
Скачать презентацию (1.35 мб)
Слайды и текст этой презентации
| Слайд №1 | |
 |
Графический интерфейс Pascal ABC |
| Слайд №2 | |
 |
Окно редактора кода |
| Слайд №3 | |
 |
Общий вид программы: program ; {заголовок программы} uses …; {раздел описания модулей} var …; {раздел объявления переменных} label …; {раздел объявления меток} const …; {раздел объявления констант} type …; {раздел объявления типов} function …; {раздел объявления функций} procedure …; {раздел объявления процедур} begin {последовательность операторов} end. {конец программы} |
| Слайд №4 | |
 |
Структура программы program ; //Раздел описаний begin //Действия end. |
| Слайд №5 | |
 |
Первая программа program hello; begin writeln (‘это моя первая программа’); end. Запуск программы F9. |
| Слайд №6 | |
 |
Компиляция (F9) Устранение ошибок в программе. |
| Слайд №7 | |
 |
Программа Результат исполнения Остановка выполнения программы |
| Слайд №8 | |
 |
Пояснения В пояснениях можно использовать русские буквы {могут находится в фигурных скобках} //могут писаться после двух слэшей |
| Слайд №9 | |
 |
Первая программа //program hello; begin writeln (‘моя первая программа’); end. Запуск программы F9. |
| Слайд №10 | |
 |
Первая программа (вывод в графическом окне) uses GraphABC; begin textout (10, 10, ‘Моя первая программа’); end. |
| Слайд №11 | |
 |
Произведение двух чисел Ввести с клавиатуры два числа, вывести на экран их произведение. |
| Слайд №12 | |
 |
Write — после вывода, курсор остается после последнего выведенного значения, Writeln — после вывода, курсор переходит на новую строку. Вывод |
| Слайд №13 | |
 |
• символьные — заключаем их в апострофы. Writeln(‘Привет!’); На экране увидим: Привет! И курсор перейдет на новую строку. • числовые — Write (1,2); Write (3, ‘ ‘,56); (числа выводятся без дополнительных пробелов) На экране: 123 56 И курсор будет стоять после цифры 6. Вывод |
| Слайд №14 | |
 |
Readln (список переменных через запятую); Read (список переменных через запятую); Ввод |
| Слайд №15 | |
 |
Задание Написать программу нахождения суммы чисел А и В, вводимых с клавиатуры. |
| Слайд №16 | |
 |
Решение Program primer; { Заголовок программы } Var A,B,S: Integer; {Раздел описания переменных } Begin { Раздел операторов} Writeln(‘Введите значения чисел А, В’); {оператор вывода} Read(A,B); {оператор ввода значений переменных с клавиатуры} S:=A+B; {оператор присваивания} Writeln(‘S=‘, S); {оператор вывода значения} Readln; {оператор ждет нажатия клавиши ввода} End. {конец программы} |
| Слайд №17 | |
 |
Задание Рассчитайте гипотенузу прямоугольного треугольника при заданных значениях катетов а и в. Исходные данные а=8, в=5 |
| Слайд №18 | |
 |
Решение program gipotenuza; var a,b,c:real; begin writeln (‘ введи значение а’); Readln (a); writeln ( ‘введи значение в’); Readln (b); c:=sqrt (sqr(a)+sqr(b)); writeln (‘гипотенуза равна ‘,c); end. |
| Слайд №19 | |
 |
Практическая работа Задача 1: Рассчитайте среднее значение двух чисел а и в. Задача 2: Рассчитайте среднее геометрическое двух неотрицательных чисел. Задача 3: Дана длина окружности L. Рассчитайте радиус окружности и площадь. |
| Слайд №20 | |
 |
Домашнее задание Написать программу вычисления площади равнобедренной трапеции. Значения основания и боковой стороны вводятся с клавиатуры. |
