64

Разработать программу на языке Паскаль. Определить техническую скорость бурения…

26 февраля 2023

Разработать программу на языке Паскаль. Определить техническую скорость бурения и производительность. Техническая скорость бурения: V=3,5*p*w/П*d*d. Производительность станка: Q=(Tc-Tn-Tp-Tl) / (60/V+tb)

категория: информатика



53

А можно не скромный вопрос. Вы где учитесь и на кого? Задача представляет собой простой линейный алгоритм (если вы ее конечно верно сформулировали).Program z1; varV,p,w,d,Q,Tc,Tn,Tp,Tl,tb: real; beginWriteln ('vvedite znacheniya peremennih V,p,w,d,Q,Tc,Tn,Tp,Tl,tb (порядок ввода важен!) ') readln (V,p,w,d,Q,Tc,Tn,Tp,Tl,tb); V=3,5*p*w/pi*d*d; {будет ругаться на pi заменить pi на 3,14}Q=(Tc-Tn-Tp-Tl) / (60/V+tb); writeln ('скорость бурения='V); writeln ('производительность='Q); end. На компиляторе не проверял, возможны неточности. В первой формуле я так понял П — это пи.

Знаете ответ?


Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...