Последовательность работы
1. Составляем блок-схему алгоритма, которая будет отражать последовательность расчета и написания программы. В данном случае используем разветвляющийся тип алгоритма [1,с.56-57], [2,с.52-53],[3,с.55-56]:
2. Составляем программу расчета на языке Паскаль, используя, для передачи управления, условный оператор перехода if…then…else.
Текст программы:
Program Lab2;
Const b=2.4; c=1.7; (описание постоянных параметров)
Var x, a, y: real; (описание переменных параметров)
Begin
write (‘ Введите x=’); (Ввод параметра х с клавиатуры)
readln (x);
a:=3.5*b/(b+exp(3*ln(c)));
if x < 1 then y:=a+b*x; (расчет параметра у)
if x = 1 then y:=sqrt(abc(a+b/x)) else
y:=sqr(a*x+b*x);
writeln (‘y=’, y); (вывод параметра у на экран)
End.
3 . Входим в среду PascalABC.NET, используя
иконку на рабочем столе компьютера.
В верхнем окне браузера набирается текст программы на языке Паскаль:
5. Сохраняем текст программы (подробно последовательность действий описана в предыдущем примере).
Достарыңызбен бөлісу: |
