Підпрограми, Детальна інформація
Підпрограми
for m:=1 to 3 do
begin if m=1 then zz:=sh else
if m=2 then zz:=ch else zz:=th;
tabf(zz, a, b, h)
end;
У діалекті Турбо Паскаль не можна використовувати стандартні математичні функції як аргументи у викликах підпрограм. Обійти це обмеження нескладно. Достатньо написати й використати власну функцію з іншим ім'ям, наприклад,
function sinmy(x : real) : real;
begin sinmy := sin(x) end;
begin if m=1 then zz:=sh else
if m=2 then zz:=ch else zz:=th;
tabf(zz, a, b, h)
end;
У діалекті Турбо Паскаль не можна використовувати стандартні математичні функції як аргументи у викликах підпрограм. Обійти це обмеження нескладно. Достатньо написати й використати власну функцію з іншим ім'ям, наприклад,
function sinmy(x : real) : real;
begin sinmy := sin(x) end;
The online video editor trusted by teams to make professional video in
minutes
© Referats, Inc · All rights reserved 2021