Задачи по Pascal. Таблица значений функции.

pascalУсловие задачи : Написать программу которая выводит таблицу значений функции y=-2.4x2+5x-3 в диапазоне от -2 до 2 с шагом 0.5.

Сложность : легкая .

Для решения задачи нам понадобиться :

1. Две переменные x и y
2. И цикл while

Давайте объявим наши переменные и создадим подобие таблицы :

uses crt;
var y , x : real ;

begin
writeln('-------------------');
writeln('      x   |   y   ');
writeln('-------------------');
end.

Можете вставить код и посмотреть что получиться или просто мысленно уберите writeln ))

В условии задачи нам сказано что диапазон от -2 до 2 , это значит что первое значение которое мы подставим в нашу функцию будет -2, следовательно мы должны переменной x присвоить -2.

x := 2 ;

Шаг у нас 0.5 , следовательно следующее значение будет равняться -1.5.

x := x + 0.5;

Вот это будет выглядеть у нас в цикле.

Давайте его напишем. Как и сказал у нас цикл while, для него в скобках надо указать условие работы, т.е. пока будет выполняться условие цикл работает.

while (x <= 2) do 

Т.е. пока у нас x меньше либо равен 2, цикл у нас работает как только x станет больше 2 цикл свою работу прекратит.

while (x <= 2) do
begin
    y := -2.4*x*x+5*x-3;
    writeln(x:8:2,'  |',y:8:2);
    x := x + 0.5;
end;

В самом цикле мы просто считаем наш y , затем выводи текущий x и y, а затем x увеличиваем на 0,5.

Весь код программы :

uses crt;
var y , x : real ;

begin
clrscr; {очищаем экран}
writeln('-------------------');
writeln('      x   |   y   ');
writeln('-------------------');

x:=-2;

while (x <= 2) do
begin
    y := -2.4*x*x+5*x-3;
    writeln(x:8:2,'  |',y:8:2);
    x := x + 0.5;
end;
readln; {чтобы программа не закрывалась .}
end.

Вот результат :

ris19

2 комментария

Написать ответ

Ваш e-mail не будет опубликован. Обязательные поля помечены *