Задания

1. Организовать ввод значений переменных: t – действительного типа; m и n – целого типа; ch – символьного типа; st – строки длиной 15 символов. Сделать пояснения на экране для пользователя. Вывести значения этих переменных в одну строку, через два пробела, в следующем порядке: st, m, t, ch, n. Для t вывести 3 десятичных знака.

2. Вывести значения этих переменных в один столбец, выровненный по левому краю, в следующем порядке: n, ch, m, st, t.

3. Вывести значения этих переменных в один столбец, выровненный по правому краю. Правый край должен быть расположен в 15-й позиции строки. Переменные вывести в следующем порядке: n, ch, m, st, t.

4. Вывести 5 раз значение переменной  t  в столбец, выровненный по правому краю, количество десятичных знаков должно быть равно номеру строки.

5. Вывести в одну строку значения переменной t в трёх разных вариантах формата вывода действительных переменных, через 5 пробелов друг от друга.

6. Вывести 5 раз значение переменной ch в одну строку, с постепенным увеличением количества пробелов между значениями.

7. Вывести значения переменной n в центр 5-й строки и m в центр 8-й строки.

8. Вывести на экран горизонтальную линию на всю ширину экрана из знаков ‘‘ (минус).

9. Вывести на экран пустую таблицу, состоящую из 4 столбцов шириной 10 знаков и 5 строк. Для изображения линий таблицы использовать знаки ‘‘ (минус), ‘|‘ (вертикальная черта), ‘+‘ (плюс).

10. Вывести результат сравнения величин m и n.

11. Пронумеровать строки на экране.

12. Написать программу, которая для заданного целого числа a (2  a  10) выводит следующую таблицу:

a

a a²

a a² a³

a a² a³ a⁴

Лабораторная работа №3 Программирование линейных алгоритмов

Самый простой вариант программы для ЭВМ – линейный алгоритм. При выполнении такой программы последовательность действий от начала программы до ее конца никогда не изменяется. На практике такие алгоритмы являются фрагментами более сложных программ.

Следующая программа производит пересчёт температуры (t) из шкалы Цельсия в шкалу Фаренгейта. Словесное описание алгоритма программы можно представить так:

 получить с клавиатуры значение температуры в градусах Цельсия;

 пересчитать температуру из шкалы Цельсия в шкалу Фаренгейта;

 вывести на экран вычисленное значение температуры в градусах Фаренгейта.

Пересчёт основан на том, что t (F) = t (С)1.8+32;

ниже приведён текст программы:

Program Temperature;

Uses crt;

Var

t,f:real;

begin

Clrscr;

Writeln('Пересчёт температуры из шкалы Цельсия в шкалу Фаренгейта');

Writeln('Введите температуру в градусах Цельсия');

Readln(t);

f:=t*1.8+32;

Writeln('Температура в градусах Фаренгейта =',f:6:1);

Readln;

End.

Наберите текст программы, сохраните на диске в своей папке под именем Temper.pas, скомпилируйте программу и запустите её на выполнение. Выполните пересчёт для следующих значений температуры по Цельсию: –273.15; –42; –17.78; 0; +25, +100.

Выражения в языке Pascal состоят из операндов и операторов. Операндами выражений могут быть константы и переменные. Операторы находятся между операндами и обозначают действия, выполняемые над операндами. Значения переменных должны быть определены до их появления в арифметическом выражении. В табл.3.1 перечислены операторы и математические функции, используемые в арифметических выражениях Turbo Pascal.

При записи выражений между операндом и оператором, за исключением операторов div и mod, пробел можно не ставить. Операторы имеют разный приоритет. Наивысший приоритет имеют функции, далее – умножение и деление, наименьший – сложение и вычитание. Приоритет операторов влияет на порядок их выполнения. При вычислении выражения сначала выполняются операторы с более высоким приоритетом. Если приоритет операторов в выражениях одинаковый, то сначала выполняется тот оператор, который находится левее. Выражение записывается в одну строку. Порядок вычислений можно изменить с использованием круглых скобок:

Y:=(R*T+25)/(a*(b+c*(d+f*(x+g))));

При записи выражений, содержащих скобки, должна соблюдаться парность скобок, т.е. число открывающих скобок должно быть равно числу закрывающих скобок.

При записи сложных выражений можно использовать вспомогательные переменные для хранения результатов промежуточных вычислений. Это позволяет проконтролировать результаты промежуточных вычислений.

Таблица 3.1

Операторы и математические функции языка Turbo Pascal

Оператор, функция	Действие	Пример записи на языке Паскаль	Тип результата
+	Сложение	y:=a+b	Как у операндов
-	Вычитание	y:=ab
*	Умножение	y:=a*b
/	Деление	y:=a/b	Real
Div	Деление нацело	y:=a Div b	Integer
Mod	Вычисление остатка от деления	y:=a Mod b	Integer
Abs	Абсолютное значение аргумента	y:=Abs(x)	Real
Sqr	Квадрат аргумента	y:=Sqr(x)	Real
Sqrt	Квадратный корень аргумента	y:=Sqrt(x)	Real
Sin	Синус аргумента	y:=Sin(x)	Real
Cos	Косинус аргумента	y:=Cos(x)	Real
Arctan	Арктангенс аргумента	y:=Arctan(x)	Real
Exp	Экспонента аргумента	y:=Exp(x)	Real
Ln	Натуральный логарифм аргумента	y:=Ln(x)	Real
Int	Целая часть аргумента	y:=Int(x)	Real
Trunc	Целая часть аргумента	y:=Trunc(x)	Integer
Round	Округление до ближайшего целого	y:=Round(x)	Integer

Как видно из таблицы, в языке Turbo Pascal отсутствуют следующие математические выражения: y=lg x; y=a^x; y=tg x.

Для вычисления этих величин можно использовать выражения: y:=ln(x)/ln(10); y:=Exp(x*ln(a)); y:=sin(x)/cos(x) соответственно.

Аргумент для тригонометрических функций задаётся в радианах. Для пересчёта из градусов в радианы используется соотношение

Радианы = градусы  (  180).

Например, чтобы вычислить sin 45 надо записать sin(45*pi/180).