Program Function Torsi Motor DC

uses crt;

var
T: integer;
K,Ø,Ia: real;

clrscr;

begin
hitung := K*Ø*Ia;
end;
var T : integer;
begin
write(‘Nilai T = ‘);
readln(T);
write (‘masukkan nilai K: ‘);
readln (K31);
write (‘masukkan nilai Ø: ‘);
readln (Ø21);
write (‘masukkan nilai Ia: ‘);
readln (Ia11);
T:=(K*Ø*Ia);
write (‘Torsi Motor DC sebesar: ‘,T);
readln;
end.