Операционная система или ОС - это п<span>акет программ, управляющий работой компьютера и обеспечивающий взаимодействие между человеком и компьютером.</span>
1 все числа однажначные
2 все числа двухзначные
Решите в паскале. Составить программу вычисляющую силу тока в цепи r1, r2, r3, r4, r5, r6, r7, r8, r8, r9, r10, r11, r12, r13, r
Наталья1708 [2]
Uses crt;
const R: array[1..20] of integer =(1, 2, 3, 4, 5, 6, 7, 8, 9, 10,
11, 12, 13, 14, 15, 16, 17, 18, 19, 20);
var I:array [1..20] of real;
U,x:integer;
SUM:real;
begin
write('U='); readln(U);
for x:=1 to 20 do
begin
write('R[',x,']:',R[x],' ');
I[x]:=U/R[x];
SUM:=SUM+I[x];
writeln('I[',x,']:',I[x]:5:3);
end;
writeln('I=',SUM:5:3);
<span>end.</span>