Лабораторная работа №4 по дисциплине: "Информатика и программирование". 2-й семестр. 7-й вариант

Тема: использование процедур и функций языка Паскаль.
Задание: по введенному значению (x) определить промежуток и вычислить значение (y) в этом промежутке. Определение промежутка для введенной величины (х) и вычисление соответствующей функции для данного промежутка представить в виде функции. Вывести номер найденного промежутка. При вводе величины (х) не входящей не в один из заданных промежутков, выдать сообщение об ошибке. При корректном определении промежутка – вывести на экран величину найденного значения (y).
Все три промежутка являются общим заданием (без вариантов).
Промежуток:
1. [-3,-2)
2. [-2, 0)
3. [0, 3]
Функция для каждого промежутка:
1. y = x3
2. y = x/2
3. y= 2x+1
Рекомендации к выполнению:
Для построения программы можно придерживаться, например, следующей структуры:
program lab4;
var
x, y: real;
p: integer;
function funcy(x: real; p: integer): real;
begin
case p of
end;
begin
writeln('Лабораторная работа №4');
writeln('Задание: по введенному значению «x» определить промежуток и вычислить значение «y» в этом промежутке');
write('Введите значение «x» из промежутка [-3;3]: ');
readln(x);
if ((x>=-3)and(x<-2)) then p:=1;
funcy(x, p);
writeln('значение переменной «x» находится в промежутке ',p);
writeln('значение переменной «y» на этом промежутке равно ',y:2:2);
readln;
end.

Вид работы: Лабораторная работа 4
Оценка:Зачет
Дата оценки: 20.11.2013
Рецензия:Замечаний нет
Проверил: Бунцев Иван Александрович