Var x: real; begin x : = 1; while (cos(1 / tan(x)) > = 0) do x : = x + 1; write(x, ': ', cos(1 / tan( end. результат выполнения программы: 6: -0.956871790478342 если нужна промежуточная печать: var x: real; begin x : = 1; while (cos(1 / tan(x)) > = 0) do begin writeln(x, ': ', cos(1 / tan(; x : = x + 1 end; writeln(x, ': ', cos(1 / tan( end. результат выполнения программы: 1: 0.800844301895226 2: 0.897089962539917 3: 0.743794228654611 4: 0.64963571596558 5: 0.956565479264333 6: -0.956871790478342
zaseche99
01.08.2020
Прикладная программа — это любая конкретная программа, способствующая решению какой-либо в пределах данной проблемной области. например, там, где на компьютер возложена контроля за финансовой деятельностью какой-либо фирмы, прикладной будет программа подготовки платежных ведомостей. прикладные программы могут носить и общий характер, например, обеспечивать составление и печатание документов и т.п. в противоположность этому, операционная система или инструментальное по не вносят прямого вклада в удовлетворение конечных потребностей пользователя. прикладные программы могут использоваться либо автономно, то есть решать поставленную без других программ, либо в составе программных комплексов или пакетов.