Напишите программу вычисления силы тока в электрической цепи. Ниже приведён рекомендуемый вид экрана во время выполнения программы (данные, введённые пользователем, выделены полужирным шрифтом):
Вычисление силы тока в электрической цепи.
Введите исходные данные:
Напряжение (вольт) -> 36
Сопротивление (Ом) -> 1500
Сила тока: 0.024 Ампер.

Для вычисления силы тока используется закон Ома:

где:

• I — сила тока в амперах;

• U — напряжение в вольтах;

• R — сопротивление в омах.

Нужно ввести значение напряжения и сопротивления, после чего программа вычисляет силу тока.

Пример программы на языке Pascal:

pascal




program CurrentCalculation;
var
  U, R, I: real;
begin
  writeln('Вычисление силы тока в электрической цепи.');
  writeln('Введите исходные данные:');
  
  write('Напряжение (вольт) -> ');
  readln(U);
  
  write('Сопротивление (Ом) -> ');
  readln(R);
  
  I := U / R;
  
  writeln('Сила тока: ', I:0:3, ' Ампер.');
end.

Пример работы программы:

Вычисление силы тока в электрической цепи.
Введите исходные данные:
Напряжение (вольт) -> 36
Сопротивление (Ом) -> 1500
Сила тока: 0.024 Ампер.

Программа получает два значения от пользователя, делит напряжение на сопротивление и выводит полученное значение силы тока.