На рисунке 6.8 приведён график зависимости силы тока в катушке индуктивностью 0,2 Гн от времени. Чему равна ЭДС самоиндукции в катушке?
225
443
Ответы на вопрос:
var
A : array [1..3] of Integer;
i : integer;
function summa(A: array [1..3] of Integer): integer;
var
max, min: integer;
begin
max := A[1];
min := A[1];
For i:=1 to 3 do
Begin
if max<A[i] then max:=A[i];
if min>A[i] then min:=A[i];
end;
summa := max + min;
end;
begin
For i:=1 to 3 do
Readln(A[i]);
writeln(summa(A));
end.
A : array [1..3] of Integer;
i : integer;
function summa(A: array [1..3] of Integer): integer;
var
max, min: integer;
begin
max := A[1];
min := A[1];
For i:=1 to 3 do
Begin
if max<A[i] then max:=A[i];
if min>A[i] then min:=A[i];
end;
summa := max + min;
end;
begin
For i:=1 to 3 do
Readln(A[i]);
writeln(summa(A));
end.
Популярно: Другие предметы
-
99897445240811.01.2023 17:34
-
ЛераКотМи25.04.2022 23:20
-
амир29502.11.2022 07:25
-
Анюта1007240122.02.2020 14:02
-
15739006948205.03.2023 07:12
-
Никита854730.07.2021 04:29
-
andreeva1979ir01.06.2021 19:11
-
moon47129.05.2021 22:55
-
eseniadautbekova20.10.2021 17:33
-
dashutkazel122116.02.2021 14:18