Слишком сложно? Тогда запросите консультацию специалиста!
Наша компания занимается тем, что помогает студентам выполнять различные учебные работы на заказ. Вы можете ознакомиться с перечнем выполняемых работ, а так же с их стоимостью на странице с ценами.
Язык программирования Паскаль был разработан Н. Виртом в 1968 -1970 годах. Турбо Паскаль появился на рынке программных продуктов в 1984 году. Турбо Паскаль состоит из языка программирования и среды, которая обеспечивает удобную и производительную работу.
Структура программы на Паскале
Program<Имя программы>;
Label <разделописания меток>;
Const <раздел описания констант>;
Type < раздел описания типов>;
Var < раздел описания переменных>;
Procedure (Function)< раздел описания подпрограмм>;
Begin
<раздел операторов>
End.
Пример: Написать программу, по которой вычисляется произведение двух целых чисел.
Program Ex1;
Var a,b,rez:integer;
Begin
Writeln(‘Введите числа’);
Readln(a,b);
rez:=a*b;
Writeln(‘Их произведение равно’,rez);
Readln;
End.
Ввод данных с клавиатурыпроизводится путем обращения к стандартной процедуре:
Readln(x1,x2,…,xn);
Значения х1,х2,…,хn набираются через пробел на клавиатуре и высвечиваются на экране, затем нажимаем Enter.
Вывод данных на экранпроизводится путем обращения к стандартной процедуре:
Writeln (x1,x2,…,xn);
Примеры:
| Значения переменной I | Оператор вывода данных | Результат на экране |
| Writeln(I); | ||
| Writeln(I); | ||
| Writeln(I,I,I); | ||
| Writeln(I:6); | - - - 134 | |
| Writeln(I:10); | - - - - - - - - - 1 | |
| Writeln(I+I:7); | - - - - 624 | |
| Writeln(‘Значение I равно_’,I); | Значение I равно_81 |
Символом “-“ обозначены пробелы.
Стандартные математические функции Паскаляпредставлены в следующей таблице:
(Для типов величин использованы обозначения: I – целый, R – вещественный)
| Обращение | Тип аргумента | Тип рез-та | Функция |
| abs (x) | I,R | I,R | Модуль аргумента |
| arctan (x) | I,R | R | Арктангенс(радианы) |
| cos (x) | I,R | R | Косинус(х в радианах) |
| exp (x) | I,R | R | ех – экспонента |
| frac (x) | I,R | R | Дробная часть х |
| int (x) | I,R | R | Целая часть х |
| ln (x) | I,R | R | Натуральный логарифм |
| random | R | Псевдослучайное число в интервале [0,1] | |
| random (x) | I | I | Псевдослучайное число в интервале [0,х] |
| round (x) | R | I | Округление до ближайшего целого |
| sin (x) | I,R | R | Синус(х – в радианах) |
| sqr (x) | I,R | R | Квадрат х |
| sqrt (x) | I,R | I,R | Корень квадратный |
| trunk (x) | R | R | Ближайшее целое, не превышающее х по модулю |
Задания:
1. Написать программу вычисления суммы четырех целых чисел.
2. Написать программу для вычисления значения выражения:
(a+3(d-12))(c-5k). Значения a, c, d, k – вводятся с клавиатуры.
3. Выведите на экран в одной строке свою фамилию, имя и отчество, в следующей – дату рождения.
4. Написать программу вычисления площади прямоугольного треугольника с катетами a и b. Результат вывести следующим образом: «Для значений катетов 4 и 6 площадь треугольника равна 12».
5. Написать программу вычисления периметра прямоугольника, ширина и длина вводятся с клавиатуры.
6. Дано х. Вычислить значение выражения:
у=15х2 + 8х – 9.
7. Записать математические выражения в виде арифметических выражений на Паскале.
а) 
б) 
в) 
3.2 Целый тип данных
Переменные целого типа описываются посредством идентификатора Integer.
Они могут принимать значения от -32768 до 32767.
Переменные целого типа описываются посредством идентификатора Longint, если переменные принимают значения от -2 147 483 648 до 2 147 483 647.
При делении целого числа на целое не всегда получается целое число, но используя операции divи mod– результаты будут целого типа.
div – целая часть от деления;
mod – остаток от деления.
Пример:19 div 4 =4 (остаток=3, отбрасывается)
19 mod 4 =3
-21 div 4 = -5
-21 mod 4= -1
-7 mod (-4)=-3
Задания:
1. Какими будут результаты вычислений?
a) 875 div 100 + (875 mod 100) div 10 + 875 mod 10
b) 391 div 100 + (391 mod 100) div 10 + 391 mod 10
2. Найти сумму цифр заданного трехзначного числа а.
