Студопедия

Главная страница Случайная страница

КАТЕГОРИИ:

АвтомобилиАстрономияБиологияГеографияДом и садДругие языкиДругоеИнформатикаИсторияКультураЛитератураЛогикаМатематикаМедицинаМеталлургияМеханикаОбразованиеОхрана трудаПедагогикаПолитикаПравоПсихологияРелигияРиторикаСоциологияСпортСтроительствоТехнологияТуризмФизикаФилософияФинансыХимияЧерчениеЭкологияЭкономикаЭлектроника






Этапы решения задачи. 1. Для вычисления значения y по одной из формул необходимо сначала вычислить значение переменной x






1. Для вычисления значения y по одной из формул необходимо сначала вычислить значение переменной x.

2. Составляем блок-схему алгоритма.

 


 

 

3. Детализируем блок " Определяем, к какому промежутку относится Х. "

 
 


 

4. Добавим блоки вычисления функции на каждом из промежутков:

 
 

 


5. Окончательная блок-схема алгоритма выглядит следующим образом:

 

 

6. Переводим блок-схему на язык Pascal.

program ZADANIE1;

var a, b, c, x, y: real; nf: integer;

begin

write('a = '); readln(a);

write('b= '); readln(b);

write('c= '); readln(c);

x: =3.5*b/(a+exp(3*ln(c));

if (x< 1) then begin

y: =a+b*x; nf: =1;

end

else if (x=1) then

begin

y: =sqrt(abs(a+b*x)); nf: =2;

end

else begin

y: =sqr(a*c+b*x); nf: =3;

end;

writeln('При a =', a: 4: 2, ‘ b=’, b: 4: 2, ‘ c=’, c: 4: 2, ‘x=’, x: 4: 2);

writeln('y =', y: 4: 2, ‘ номер формулы=’, nf: 2);

end.

7. Выполним программу в среде PascalABC.NET (см. п.3.1.4).


Поделиться с друзьями:

mylektsii.su - Мои Лекции - 2015-2024 год. (0.008 сек.)Все материалы представленные на сайте исключительно с целью ознакомления читателями и не преследуют коммерческих целей или нарушение авторских прав Пожаловаться на материал