III. Практическая часть.
Давайте рассмотрим, как записываются на Паскале знакомые вам физические формулы:
|
I := U/R |
|
F := m*a |
|
Q := c*m*(tk-tn) |
Для примера составим программу решение следующей задачи:
«Определить сколько времени будет падать с яблони яблоко. Высота ветки вводится с клавиатуры».
Время падения можно
вычислить по формуле:
На паскале это выражение можно записать
так: t:=sqrt(2*h/g). Ускорение свободного
падения примем равным 10.
Алгоритм решения может быть такой:
описать константы;
описать переменные;
ввести значение высоты ветки;
вычислить время падения;
вывести результат на экран.
Составим программу:
program timeappledown; {вычисление времени падения яблока}
uses WinCrt;
const
g = 10;
var
h,t:real;
begin
write(Введите высоту ветки в метрах: ');
readln(h);
t:=sqrt(2*h/g);
writeln('Время падения: ',t:3:1, 'секунд');
end.
Запустим программу и получим результат:
Теперь измените программу, чтобы решить следующую задачу: «На дереве висит груша. Вычислите силу тяжести действующую на грушу. Масса груши вводится с клавиатуры». Сила тяжести находится по формуле F=mg.
Арифметические операции в Паскале.
Арифметические операции в Паскале.
1. Операции с дробными числами (обычные, как в математике).
- вычитание; + сложение; * умножение; / деление.
2. Операции с целыми числами.
- вычитание; + сложение; * умножение;
Деление представлено двумя операциями:
div - целая часть от деления, mod - остаток.
23 div 3 = 7 23 mod 3 = 2
9 div 4 = 2 9 mod 4 = 1
35 div 10 = 3 35 mod 10 = 5
3. Приоритет арифметических операций: вначале - умножение и деление ( /, div, mod). Затем - сложение и вычитание. Порядок выполнения действий - слева направо. В выражениях могут быть скобки, при этом вначале производятся вычисления в скобках.
READLN.
Процедура Readln считыват значения, вводимые с клавиатуры, и записывает их в переменные, которые указаны. Общий вид:
Readln (<имя>,...,<имя>);
Например, если на запрос Readln (а, с, х); с клавиатуры будут введены числа 2, 5, и 4.6, то переменные получат значения: а=2, с=5, х=4.6.
Примечание: при вводе значения разделяются пробелами.
WRITELN и WRITE.
Процедуры Writeln и Write служат для печати информации в "черном" экране компьютера. Они отличаются только тем, что процедура Write после напечатанного оставляет курсор на той же строчке, а Writeln переводит его после печати на новую строку. Общий вид: Writeln (<список вывода>);
Элементы списка вывода разделяются запятыми. Элементом может быть:
а) текст, заключенный в апострофы; в него могут входить любые символы, в том числе и русские буквы. При этом текст будет напечатан на экране точно в таком же виде, в каком указан в операторе.
Например: в программе - Write ('Привет!'); на экране
Привет!
б) имя переменной - на экране будет напечатано ее значение. Например:
если Х=675, то в программе - Write (Х);
на экране - 675
в) выражение - будет вычислено его значение и напечатан результат. Например:
в программе - Write (34*2+102);
на экране - 170
ЗАДАЧА. Ввести с клавиатуры скорость и время путника. Напечатать расстояние.
Решение.
Program Rasst; {комментарии записывают в фигурных скобках}
var v,t:integer; {объявляем 2 переменные - целые числа}
begin {тело программы записываем с отступом вправо}
Write ('введи v и t '); {печатается приглашение для ввода числа}
Readln (v, t); {запрашиваются с клавиатуры значения для v и t}
Writeln ('S=',v*t); {печатается текст "S=" и результат v*t}
Readln {задержка в "черном" экране, выход - Enter}
end.