Ответ:
program Qwerty;
var a, b, c, d, e, f, g: real;
begin
readln (a, b, c, d, e);
f:=5;
g:=(a+b+c+d+e)/f;
writeln (g);
end.
Объяснение:
Винчестер - сленговое название устройства для записи и считывания на жёстких дисках
Ответ:
Б) Семеричной
Объяснение:
513₇ = 3*7⁰ + 1*7¹ + 5*7² = 255₁₀
64₇ = 4*7⁰ + 6*7¹ = 46₁₀
610₇ = 0*7⁰ + 1*7¹ + 6*7² = 301₁₀
Uses Crt;
Var
A:array[1..256] of integer;
i,iMin,N,B:integer;
Begin
ClrScr;
Randomize;
Write('N = ');ReadLn(N);
Write('A(',N,'):');
iMin:=1;
For i:= 1 to n do
Begin
A[i]:=random(21)-10;
Write(' ',A[i]);
if A[i] < A[iMin] then iMin:=i;
End;
WriteLn;
WriteLn('Min(A) = ',A[iMin],'[',iMin,']');
Write('Min = ');ReadLn(i);
B:=A[i];
A[i]:=A[iMin];
A[iMin]:=B;
Write('A(',N,'):');
For i:= 1 to n do
Write(' ',A[i]);
ReadKey
End.
Разработка макета. Физические тесты моделей через спец программы.