Program func;
const
H = 0.2;
var
i, y, sum: real;
function Func(x:real):real;
begin
Func := x * Cos( (2 * x) );
end;
begin
i := -1;
sum := 0;
while i<=1 do
begin
y := Func(i);
if y>0 then
sum := sum + y;
i := i + H;
end;
end.
В основу работы компьютеров положен программный принцип управления, состоящий в том, что компьютер выполняет действия по заранее заданной программе. Этот принцип обеспечивает универсальность использования компьютера: в определенный момент времени решается задача соответственно выбранной программе. После ее завершения в память <span>загружается другая программа и т.д.</span>
Формулы- это выражения состоящее из чисел,адресов, яйчеек, разнообразных функций, имен! Которые соеденены знаками такие как:
возведение в степень и выражения в скобках;
умножение и деление;
<span>сложение и вычитание.
Функции- это готовые формулы для всяких вычислений, куда надо просто вставить аргументы
Например: КРЮК(А3;А9)
КРЮК- это название функции
А3;А9- это те самые аргументы
А ОТЛИЧАЮТСЯ ТЕМ ЧТО
ФОРМУЛЫ НУЖНЫ ДЛЯ СОСТАВЛЕНИЯ ФУНКЦИИ
А ФУНКЦИИ УЖЕ КАК БЫ ГОТОВЫЕ ФОРМУЛЫ КУДА ПРОСТО ВСТАВЛЯЕШЬ АРГУМЕНТЫ!
</span>
program raf105;
var
a,b,c,paint: real;
begin
write('Длина: ');
readln(a);
write('Ширина: ');
readln(b);
write('Высота: ');
readln(c);
paint:= (a*c*2 + b*c*2 + a*b) * 0.2;
writeln('Требуется ',paint,' л. краски');
end.
<h3>
PascalABC</h3>