- 174
- 33
- CPU
- I7-9750H
- GPU
- GTX 1660Ti
- Audio
- Focusrite 2i2 solo (3rd Gen)
- OS
- Windows 10
Salve a tutti!
C'è qualcuno che mastica un po' il linguaggio (antiquato) Pascal?
Ho una calcolatrice Hp Prime che mi consente di eseguire degli script scritti in Pascal.
Dato che non ho mai programmato in questo linguaggio, però uso molto Matlab c'è qualcuno disponibile a darmi una mano per 'convertire' lo script da Matlab a Pascal in maniera tale da farlo funzionare anche sulla calcolatrice?
Allego il codice scritto in Matlab:
Ringrazio in anticipo chi potrà aiutarmi.
C'è qualcuno che mastica un po' il linguaggio (antiquato) Pascal?
Ho una calcolatrice Hp Prime che mi consente di eseguire degli script scritti in Pascal.
Dato che non ho mai programmato in questo linguaggio, però uso molto Matlab c'è qualcuno disponibile a darmi una mano per 'convertire' lo script da Matlab a Pascal in maniera tale da farlo funzionare anche sulla calcolatrice?
Allego il codice scritto in Matlab:
C:
function[fattore_di_attrito]=fattore_di_attrito(Re,scabrezza)
format short
if Re>=10.^3&&Re<=2100
f=16./Re
elseif Re>=40000 && Re<=10.^8
f2=1./((3.6.^2).*(log10(6.9./Re + ((scabrezza)./3.7).^(10./9))).^2)
else
Re>2100 && Re<40000
%Ciclo iterativo con Equazione di Colebrook
f=input('inserisci valore tentativo fattore di attrito:')
j=1
while (abs((f-j)./j)).*100>0.00001
j=f
f=1./(16.*(log10((scabrezza./3.71)+2.51./(2.*Re.*(f).^0.5))).^2)
end
fprintf('f %g',f)
end
Ringrazio in anticipo chi potrà aiutarmi.
Ultima modifica: