
- •Самарский государственный университет путей сообщения
- •Информатика Основы программирования в среде Turbo Pascal
- •О сновы программирования в среде turbo pascal введение
- •Лабораторная работа №1. Знакомство с интегрированной средой Turbo Pascal
- •Задание 1. Знакомство с интерфейсом среды Turbo Pascal
- •Задание 2. Работа с буфером обмена
- •Задание 3. Компиляция и запуск программы
- •Лабораторная работа №2. Программирование линейных алгоритмов
- •Задание 1. Вычисление площади треугольника
- •Задание 2. Вычисление сопротивления цепи
- •Задание 3. Вычисление значения функции
- •Задание 4. Самостоятельное решение задач
- •Тестовое задание. Вариант задает преподаватель!
- •Лабораторная работа №3. Разветвляющиеся алгоритмы
- •Р ис. 1. Блок-схема условного оператора
- •Задание 1. Использование условного оператора
- •Р ис. 2. Блок-схема программы
- •Задание 2. Вложенные условные операторы
- •Задание 3. Нахождение максимума двух чисел
- •Задание 4. Самостоятельное решение задач
- •Тестовое задание. Вариант вашего задания совпадает с номером вашего компьютера!
- •Контрольное задание Вариант вашего задания задает преподаватель!
- •Лабораторная работа №4. Программирование циклов с условием
- •Задание 1. Оператор цикла с предусловием
- •Задание 2. Программа "Угадай число".
- •Задание 3. Алгоритм Евклида.
- •Задание 4. Оператор цикла с постусловием
- •Задание 5. Решение задач по теме
- •Лабораторная работа №5. Программирование циклов с параметром
- •Задание 1. Нахождение суммы
- •Задание 2. Таблица перевода миль в километры
- •Задание 3. Табулирование функции
- •Задание 4. Решение задач по теме Номера задач задает преподаватель!
- •Контрольное задание Вариант вашего задания задает преподаватель!
- •Лабораторная работа №6. Решение задач целочисленной арифметики
- •Номера задач задает преподаватель!
- •Лабораторная работа №6. Одномерные массивы
- •Задание 1. Ввод и вывод элементов массива
- •Задание 2. Использование массивов при вычислении значений функции
- •Задание 3. Однотипная обработка элементов массива
- •Задание 4. Нахождение минимального (максимального) элемента массива
- •Задание 5. Нахождение суммы элементов массива
- •Задание 6. Нахождение количества элементов массива
- •Задание 7. Решение задач по теме Номера задач задает преподаватель!
- •Контрольное задание Вариант вашего задания задает преподаватель!
- •Лабораторная работа №7. Строковые переменные
- •Задание 1. Проверка на совпадение первой и последней букв строки
- •Задание 2. Подсчет количества букв
- •Задание 3. Слова - перевёртыши
- •Задание 4. Замена букв в слове
- •Задание 5. Удаление символов в слове
- •Задание 6. Решение задач по теме Номера задач задает преподаватель!
- •Контрольное задание Вариант вашего задания задает преподаватель!
- •Лабораторная работа №8. Файлы
- •Задание 1. Запись вводимых данных во внешний файл
- •Задание 2. Чтение данных из файла
- •Задание 3. Нахождение суммы компонент числового файла
- •Задание 4. Вывод списка учащихся из файла
- •Контрольное задание Вариант вашего задания задает преподаватель!
- •Библиографический список
Задание 2. Таблица перевода миль в километры
Составьте программу вывода на экран таблицы перевода милей в километры (1 миля = 1,603 км) для значений 1 миля, 2 мили, …, 10 миль.
Program Mile;
const k=1.603;
var mi: integer; km: real;
begin
writeln('Таблица перевода миль в км');
writeln;
for mi:=1 to 10 do
begin
km:=k*mi;
writeln(mi : 4, 'm = ', km : 6 : 3,' км');
end
end.
Результаты, полученные после запуска программы, будут на экране выглядеть так:
Таблица перевода миль в км
m = 1.603 км
m = 3.206 км
m = 4.809 км
и т.д.
Задание 3. Табулирование функции
Составить программу на языке Turbo Pascal для вычисления значений функции у = Ln (х) на отрезке [а, b] с шагом h.
Program Tab_3;
var a, b, h, x, y: real; n, i: integer;
begin
Writeln ('Введите значения a, b');
Read (a, b);
Writeln ('Введите шаг h');
Read (h);
n:=round((b-a)/h);
Writeln('Таблица значений функции');
for i:=0 to n do
begin
x:=a+h*i;
y:=ln(x);
Writeln('x=', x:4:2, ' y=', y:6:2)
end
end.
Задание 4. Решение задач по теме Номера задач задает преподаватель!
Составьте программу табулирования функции
на отрезке [0,1] с шагом 0.2.
Составьте программу табулирования функции
на отрезке [1,10] с шагом 0.5.
Составьте программу табулирования функции
на отрезке [0,1] с шагом 0.1.
Составьте программу, выводящую на экран таблицу соответствия значений температуры по Цельсию ТС и значений температуры по Фаренгейту ТF на отрезке от 15С до 30С с шагом в 1С, если формула перевода температур имеет вид:
.
Составить программу вычисления суммы первых 20 натуральных чисел
Составить программу вычисления суммы натуральных чисел от 15 до 35
Составить программу вычисления суммы синусов натуральных чисел от N до M.
Составить программу вычисления произведения первых 7 натуральных чисел.
Составить программу вычисления произведения логарифмов натуральных чисел от 2 до 18.
Составить программу вычисления произведения квадратов косинусов натуральных чисел от N до M.
Составить программу вычисления суммы:
.
Составить программу вычисления суммы:
.
Составить программу вычисления произведения:
.
Составить программу вычисления произведения:
.
Контрольное задание Вариант вашего задания задает преподаватель!
Составьте программу вычисления значений заданной функции при изменении аргумента на заданном отрезке с заданным шагом.
Отчет по заданию оформите в письменном виде!
Отчет должен содержать условия задачи, блок-схему алгоритма, текст программы, исходные данные и результаты.
Для заданной функции
вывести на экран положительные значения функции и соответствующие им значения аргумента на отрезке х
с шагом h.
Для заданной функции
вывести на экран отрицательные значения функции и соответствующие им значения аргумента на отрезке y
с шагом h.
Для заданной функции
вывести на экран значения функции в пределах от –1 до 2 и соответствующие им значения аргумента на отрезке х
с шагом h=0,3.
Для заданной функции
вывести на экран значения функции, которые больше 1 и соответствующие им значения аргумента на отрезке t
с шагом h.
Для заданной функции
вывести на экран значения функции, которые меньше 1 и соответствующие им значения аргумента на отрезке f
с шагом h.
Для заданной функции
вывести на экран значения функции в диапазоне от -1 до 3 и соответствующие им значения аргумента на отрезке y
с шагом h=0,2.
Для заданной функции
вывести на экран отрицательные значения функции и соответствующие им значения аргумента на отрезке t
с шагом h.
Для заданной функции f = sin(2.8
)+
вывести на экран значения функции, которые лежат в пределах от –1 до 2 и соответствующие им значения аргумента на отрезке х
с шагом h=0,2.
Для заданной функции
вывести на экран положительные значения функции и соответствующие им значения аргумента на отрезке c
с шагом h.
Для заданной функции d = (x-1)(x+3.4) +sin(
) вывести на экран значения функции, которые больше -1 и соответствующие им значения аргумента на отрезке х
с шагом h.
Для заданной функции
вывести на экран отрицательные значения функции и соответствующие им значения аргумента на отрезке
с шагом
.
Для заданной функции
вывести на экран значения функции, которые меньше -1,6 и соответствующие им значения аргумента на отрезке
с шагом .
Для заданной функции
вывести на экран значения функции, которые лежат в пределах от –1 до 1 и соответствующие им значения аргумента на отрезке
с шагом
.
Для заданной функции
вывести на экран положительные значения функции и соответствующие им значения аргумента на отрезке
с шагом h=0,3.
Для заданной функции
вывести на экран значения функции, которые больше 0,2 и соответствующие им значения аргумента на отрезке
с шагом .
Для заданной функции
вывести на экран значения функции, которые больше -1 и соответствующие им значения аргумента на отрезке
с шагом h.
Для заданной функции
вывести на экран значения функции, которые лежат в пределах от –5 до 5 и соответствующие им значения аргумента на отрезке
с шагом h.
Для заданной функции
вывести на экран значения функции, которые меньше -1,4 и соответствующие им значения аргумента на отрезке
с шагом h=0,2.
Для заданной функции
вывести на экран значения функции, которые лежат в диапазоне a до b и соответствующие им значения аргумента на отрезке
с шагом h.
Для заданной функции
вывести на экран отрицательные значения функции и соответствующие им значения аргумента на отрезке
с шагом h.
Для заданной функции
вывести на экран значения функции, которые лежат в пределах от –10 до -1 и соответствующие им значения аргумента на отрезке
с шагом h.
Для заданной функции
вывести на экран значения функции, которые лежат в пределах от -1 до 1 и соответствующие им значения аргумента на отрезке
с шагом h=0,2.
Для заданной функции
вывести на экран значения функции, которые меньше -1 и соответствующие им значения аргумента на отрезке t
с шагом h=0,3.
Для заданной функции
вывести на экран отрицательные значения функции и соответствующие им значения аргумента на отрезке
с шагом h=0,3.
Для заданной функции
вывести на экран значения функции, которые лежат в пределах от -2 до 0 и соответствующие им значения аргумента на отрезке
с шагом h=0,3.
Для заданной функции
вывести на экран положительные значения функции и соответствующие им значения аргумента на отрезке
с шагом h=0,2.
Для заданной функции
вывести на экран значения функции, которые лежат в пределах от 1 до 12 и соответствующие им значения аргумента на отрезке с шагом h=0,3.
Для заданной функции
вывести на экран значения функции, которые меньше 4 и соответствующие им значения аргумента на отрезке
с шагом h.
Для заданной функции
вывести на экран значения функции, которые лежат в пределах от a до b и соответствующие им значения аргумента на отрезке
с шагом h=0,2.
Для заданной функции
вывести на экран отрицательные значения функции и соответствующие им значения аргумента на отрезке
с шагом h.