Найти силу тока в цепи, если сопротивление чайника 50 Ом, а напряжение в розетке 220 вольт. Составить линейную программу

program raf105;

var U,R,I: real;

begin

write('Сопротивление R = ');

readln(R);

write('Напряжение U = ');

readln(U);

I:= U/R;

writeln('Сила тока в цепи I = ',I);

end.