Question

составьте программу для вычисления величины силы тока на участке электрической цепи с сопростивлением R ом при напряжении U вольт

Answer 1

var
I,U,R: real;
begin
write('Введите значение напряжения (U, В) = '); readln(U);
write('Введите значение сопротивления (R, Ом) = '); readln(R);
I:=U/R;
write('Сила тока (I, A) = ', I);
end.