Question

Напишите программу Pascal которая находит сопротивление через известные величины U и I, которые являются действительными числами.

Answer 1

Это было очень сложно..

var
   U,I: real;
begin
   write('Введите U и I: ');
   read(U, I);
   write('Сопротивление равно ', U / I, ' Ом');
end.

Answer 2

Расчет сопротивления в программе Pascal

Для расчета сопротивления через известные величины напряжения (U) и силы тока (I) в программе Pascal, можно использовать следующий код:

program CalculateResistance;
var
  U, I, R: real;
begin
  writeln('Enter the value of voltage (U): ');
  readln(U);
  writeln('Enter the value of current (I): ');
  readln(I);
  
  R := U / I;
  
  writeln('The resistance (R) is: ', R:0:2);
end.

Этот код позволяет пользователю ввести значения напряжения (U) и силы тока (I), а затем вычисляет сопротивление (R) по формуле R = U / I. Результат выводится на экран.

Пример использования: ``` Enter the value of voltage (U): 12 Enter the value of current (I): 3 The resistance (R) is: 4.00 ```

Теперь вы можете использовать эту программу для расчета сопротивления на основе известных значений напряжения и силы тока.