<span>Как правило, человек выступает в роли неформального исполнителя. Формальными исполнителями являются преимущественно технические устройства. </span>
Человек в роли неформального исполнителя сам отвечает за свои действия. За действия формального исполнителя отвечает управляющий им объект.<span>Рассмотрим
более подробно множество формальных исполнителей. Формальные
исполнители необычайно разнообразны, но для каждого из них можно указать
круг решаемых задач, среду, систему команд, систему отказов и режимы
работы.</span>
Uses crt;var i,s:integer; a:array [1..100] of integer;
beginfor i:=1 to 4 do begin writeln ('vvedite massiv');readln(a[i]);end;for i:=1 to 4 do begin s:=s+a[i];end;writeln(s,' ');end.
Var
a,b,h,x,f:real;
begin
Write('Введите a,b,h: ');
Read(a,b,h);
x:=a;
while x<=b do
begin
f:=sqrt(x)*sqr(cos(x));
Writeln(x:5:3,f:15:8);
x:=x+h
end
end.
Тестовое решение
Введите a,b,h: 0 3 0.25
0.000 0.00000000
0.250 0.46939564
0.500 0.54457910
0.750 0.46364281
1.000 0.29192658
1.250 0.11116410
1.500 0.00612832
1.750 0.04202995
2.000 0.24491094
2.250 0.59190315
2.500 1.01482406
2.750 1.41675413
3.000 1.69755726
var
a,b,h,x,f:real;
begin
Write('Введите a,b,h: ');
Read(a,b,h);
x:=a;
repeat
f:=sqrt(x)*sqr(cos(x));
Writeln(x:5:3,f:15:8);
x:=x+h
until x>b
end.
Тестовое решение
Введите a,b,h: 0 3 0.25
0.000 0.00000000
0.250 0.46939564
0.500 0.54457910
0.750 0.46364281
1.000 0.29192658
1.250 0.11116410
1.500 0.00612832
1.750 0.04202995
2.000 0.24491094
2.250 0.59190315
2.500 1.01482406
2.750 1.41675413
3.000 1.69755726
Да! может содержать вложенные каталоги
Незнаю как тебе это поможет, но вдруг;(