Презентация на тему: Программирование на языке Паскаль (начальные сведения)

Язык программирования «Паскаль» Программирование на Паскале

Основные типы переменных Целый тип - integer. Целые числа от -32768 до 32767. Действительный тип – real. Символьный тип - char. Один любой символ. Строковый тип - string. Строка до 255 символов. Логический тип - boolean. Одно из 2 значений: истина (TRUE ) или ложь (FALSE).

Основные типы переменных Пример: x: integer; y:real; a:char; b:string; c:boolean. Допустимые значения переменных: x:=28; x:=x-12; y:=7.8; y:= 2.1*x; a:= ‘H’ ; a:= ‘+’; b:= ’лето’; c:= 5< 7   Типы всех переменных, используемых в программе, указываются в специальном разделе .

Структура программы Программа состоит из следующих разделов: заголовок ( program имя; ) подключение библиотеки подпрограмм ( uses crt; ) объявление меток ( label 1,12,#1;) объявление констант ( const e=2.7; ) определяемые пользователем типы данных ( type …;) объявление переменных ( var a: real; b,c : char; ) раздел подпрограмм основной блок программы ( begin … end.)

Структура программы Все разделы кроме последнего могут отсутствовать. Как правило простые программы состоят из трех разделов: 2, 6, 8. Комментарии в тексте программы указываются в фигурных скобках.

Пример программы Uses crt; Var a,b,s: integer; h:real; Begin Write (‘Введите два числа ‘); Readln (a, b); s:= a+b; h:= a/b; Writeln (‘Сумма = ‘,s); Writeln (‘Частное = ‘,h); End. 1 2 3 4 Определить сумму и частное двух целых чисел Части программы объявление переменных; ввод исходных данных; решение задачи; вывод результатов.

Программа и результаты работы программы

Команда вывода информации на экран Write и Writeln x:=20; y:=2012; n:=43; Writeln (‘Сегодня ‘); Write (x, ‘ сентября ’); Writeln (y,’ года’); Writeln (‘Школа №’,n); Сегодня 20 сентября 2012 года Школа №43 Фрагмент программы Результат выполнения фрагмента программы

Вывод переменных действительного типа (Real) Примеры: (на вывод числа отводится 6 знакомест) Writeln(‘Summa = ’,s) Summa = 24.637284512 Writeln(‘Summa = ’,s:6:2) Summa = 24.64 Writeln(‘Summa = ’,s:6:1) Summa = 24.6 Writeln(‘Summa = ’,s:6:0) Summa = 25 Writeln(‘Summa = ’,s:6:3) Summa = 24.637 Writeln(‘Summa = ’,s:6:5) Summa = 24.63728

Команда ввода информации с клавиатуры Readln Write (‘Введите два числа ‘); Readln (a, b); Write (‘Введите третье число ‘); Readln (c); Введите два числа 7 4 Введите третье число 6 Фрагмент программы Результат выполнения фрагмента программы Числовые значения вводятся с клавиатуры и присваиваются переменным a, b, c

Команда присваивания Имя переменой := выражение; Примеры имён переменных: a, x1, summa, max1. Примеры выражений: 1. Число: x:=24, evro:=44.38 2. Имя переменной: x:=y, x1:=a 3. Арифметическое выражение: p:=2*(a+b), x1:=(-b+sqrt(d))/(2*a) Тип переменной должен соответствовать типу выражения.

Арифметические операции 1. Сложение: + 2. Вычитание: - 3. Умножение: * 4. Деление: / Для целых чисел и переменных целого типа имеются ещё две операции 5. Целочисленное деление: div x:=27 div 5 ( результат x=5) 6. Остаток от деления: mod x:=27 mod 5 ( результат x=2)

Разработать программы для решения задач Даны длина и ширина прямоугольника. Определить площадь и периметр прямоугольника. Даны катеты прямоугольного треугольника. Определить площадь и периметр треугольника. → sqrt(b*b) Дано двузначное (трехзначное) целое число. Определить сумму цифр. Определить стоимость покупки и размер сдачи. Цена товара, количество купленных килограмм и количество поданных кассиру денег вводятся с клавиатуры.

Определить стоимость покупки и размер сдачи. Цена товара, количество купленных килограмм и коли-чество поданных кассиру денег вводятся с клавиатуры. Дано: С – цена товара К – количество кг. М – количество поданных денег Найти: S – стоимость покупки Р – размер сдачи Решение: S = C * K P = M – S var c, k, s, p, m: real; Begin write (‘Введите цену ‘); readln (с); write (‘Введите кол-во кг. ‘); readln (к); write (‘Введ. поданные деньги ‘); readln (m); s := c * k; p := m – s; writeln (‘Стоимость покупки = ’,s); writeln (‘Размер сдачи = ’,p); end. 4 1 2 3

Определить количество денег в долларах, если известно количество денег в рублях. (1 доллар = 36,38 руб.) Дано: К – количество руб. Найти: D – количество долларов Решение: D = K / 36,38 Write (‘Введите кол-во рублей ‘); Readln (k); d := k / 36.38; Writeln (‘Кол-во долларов = ’,d); End. Var d: real; k: integer; 4 1 2 3 Uses crt; Begin