Последовательность выполнения

1. Загрузите TPascal, разверните окно на весь экран.

2. Используя клавиатуру, введите текст программы для следующего задания: Ввести радиус окружности R. Вычислить длину окружности и площадь круга с радиусом R.

Var

R: Integer;

S,L : Real;

Begin

Write(‘VVod R’);

Readln(R);

L:= 2 * 3.14 * R;

S:= 3.14 * R * R;

Writeln(‘L=’,L);

Writeln(‘S=’,S);

End.

1. Загрузите программу на выполнение, для этого выполните Ctrl/F9 или Run / Run
2. Введите любое целое число и нажмите Enter,
3. Для просмотра результата отобразите окно вывода Debug / Output
4. Для того, чтобы это окно закрепить на экране выполните Window / Title
5. Загрузите программу еще несколько раз, вводите разные числа, просмотрите результат вычисления
6. Сохраните программу
7. Введите текст другой программы в новом окне (File / New) для следующего задания:

Вычислить значение выражения

Var

X,Y : Real;

Begin

Write(‘Vvod x ’);

Readln(x);

Y:=SQRT(ABS(X-5)+SIN(X)) / SQR(X) – COS((2*X)/(1/SQR(X));

Writeln(‘Y=’,Y);

End.

8. Проверьте работу программы с различными числовыми данными (целыми или вещественными), в том числе для нулевого значения. Сохраните программу

Контрольные вопросы

· Как загрузить TPascal?

· Как сохранить программу?

· По каким правилам следует давать имя файла с программой?

· Как отобразить окно вывода?

· Как закрепить окно вывода?

· Как запустить программу на выполнение?

· Как выйти из среды TPascal?

Варианты к лабораторной работе №3

(ваш номер по журналу соответствует номеру варианта)

№	Задание 1 Задание 2 Задание 3(Вычислить)
	Ввести время (часы и минуты). Определить сколько секунд прошло с начала суток.
Дано число а. Не пользуясь никакими другими арифметическими операциями, кроме умножения, получить а4 за две операции.
Y= cos(sin3x-5)+2
	Ввести значение угла в радианах. Определить угол в градусах.
Дано число а. Не пользуясь никакими другими арифметическими операциями, кроме умножения, получить:а6 за три операции.
Y= cos x +sin 2x- tg(-2 x)
	Ввести цену (в рублях) и количество для двух товаров. Определить общую стоимость покупки.
Дано число а. Не пользуясь никакими другими арифметическими операциями, кроме умножения, получить: а8 за три операции.
	Вычислить расстояние между двумя точками, если известны координаты точек
Дано число а. Не пользуясь никакими другими арифметическими операциями, кроме сложения, получить 4а за две операции.
	Ввести время вылета (час, минуты) и время прилета (час, минуты) самолета. Определить время полета (часы, минуты), если известно, что перехода через сутки не было.
Дано число а. Не пользуясь никакими другими арифметическими операциями, кроме сложения, получить: 8а за три операции.
	Три сопротивления R1, R2, R3 соединены параллельно. Найти общее сопротивления цепи.
Дано число а. Не пользуясь никакими другими арифметическими операциями, кроме умножения, получить а4 и а20 за пять операций.
	Ввести четырехзначное число. Вывести сумму первой и последней цифры
Дано число а. Не пользуясь никакими другими арифметическими операциями, кроме умножения, получить а3 и а10 за четыре операции
	Ввести внутренний и внешний радиусы кольца. Найти площадь кольца.
Дано число а. Не пользуясь никакими другими арифметическими операциями, кроме умножения, получить а7 за четыре операции.
	Ввести число. Вывести его последнюю цифру
Дано число а. Не пользуясь никакими другими арифметическими операциями, кроме сложения, получить 4а и 20а за пять операций.
	Ввести число. Заменить его последнюю цифру на ноль
Ввести стоимость товара в долларах и курс доллара по отношению в рублю. Определить стоимость в рублях.
	Даны катеты прямоугольного треугольника. Найти гипотенузу и площадь
Дано число а. Не пользуясь никакими другими арифметическими операциями, кроме сложения, получить: 6а за три операции.
	Ввести трехзначное число. Вывести вторую цифру.
Дано число а. Не пользуясь никакими другими арифметическими операциями, кроме умножения, получить 3а и 10а за четыре операции
	Ввести катеты прямоугольного треугольника. Вычислить периметр и площадь треугольника
Ввести два положительных числа. Найти их среднее арифметическое и среднее геометрическое значения.
	Ввести трехзначное число. Найти сумму его цифр.
Ввести диаметр окружности. Найти площадь круга.
	Ввести стороны треугольника. Определить его площадь
Ввести двузначное число. Поменять цифры числа местами (например: дано 47, вывести надо 74).
	Ввести двухзначное число. Вычислить сумму и произведение его цифр
Ввести количество секунд с начала суток. Определить сколько часов прошло с начала суток
	Ввести трехзначное число. Удалить из числа вторую цифру (например, дано 248, результат 28)
Три сопротивления R1, R2, R3 соединены последовательно. Найти общее сопротивления цепи.
	Ввести трехзначное число. Вывести произведение его цифр.
Найти площадь кольца, если известны внутренний и внешний радиусы.
	Ввести четырехзначное число. Найти разницу между числом из первых двух цифр и числом из последних двух цифр.
Дано число а. Не пользуясь никакими другими арифметическими операциями, кроме сложения, получить: 8а за три операции.
	Ввести двузначное число. Вычислить сумму квадратов его цифр.
Ввести значение угла в радианах. Определить значение в градусах.
	Ввести трехзначное число. Вычислить корень квадратный торой цифры
Дано число а. Не пользуясь никакими другими арифметическими операциями, кроме умножения, получить: а8 за три операции.
	Дано двузначное число. Найти разницу между первой и второй цифрой.
Ввести время (час, мин.). Сколько секунд прошло с начала суток.
	Ввести цену товара в $ и курс $ по отношению в рублю. Определить стоимость в рублях.
Ввести время вылета (ч., мин.) и время прилета (ч., мин.) самолета. Определить время полета (ч., мин.). Перехода через сутки не было.
	Ввести трехзначное число. Вычислить среднее арифметическое его цифр
Дано число а. Не пользуясь никакими другими арифметическими операциями, кроме умножения, получить а4 и а20 за пять операций.
	Ввести значение угла в радианах. Определить угол в градусах
Ввести четырехзначное число. Найти сумму числа из первых двух цифр с числом из последних двух цифр.
	Ввести значение угла в градусах. Вывести в радианах.
Ввести трехзначное число. Вывести произведение его цифр.
	Ввести трехзначное число. Первую и последнюю цифру поменять местами (например, дано 123, результат 321).
Дано число а. Не пользуясь никакими другими арифметическими операциями, кроме умножения, получить а4 за две операции.
	Ввести трехзначное число. Найти сумму его цифр.
Ввести время начала урока (часы, минуты) и время окончания урока (часы, минуты) определить, сколько в часах и минутах длился урок.
	Вычислить периметр и площадь прямоугольного треугольника по длинам его катетов.
Дано число а. Не пользуясь никакими другими арифметическими операциями, кроме умножения, получить: а8 за три операции.
	Ввести двухзначное число. Вычислить сумму и произведение его цифр цифру (например, дано 251, результат 51)
Дано число а. Не пользуясь никакими другими арифметическими операциями, кроме умножения, получить а3 и а10 за четыре операции.
	Ввести двухзначное число. Вычислить сумму и произведение его цифр
Дано число а. Не пользуясь никакими другими арифметическими операциями, кроме сложения, получить 4а за две операции.