#include <stdio.h> #include <math.h> int main() { const int n=10; double x=11.1,i,a,amin=0.5,res; for (int k=1; k<=n; k++) { double f=exp(cos(pow(x,2*k)))*sin(pow(x,3*k)); a=modf(f,&i); if(fabs(a)<amin) { amin=fabs(a); res=f; } } printf ("\nResult=%lf (%lf in fractional part)",res,amin); fflush (stdin); getchar(); return 0; }<img title="Помогите переделать программу с C++ на паскаль)" src="//sprtqa.b-cdn.net/download/cecdedeb3230ec2bfbb6a9fe8c1f73d8_i-1.jpg">

Помогите переделать программу с C++ на паскаль)

#include
#include

int main() {
const int n=10;
double x=11.1,i,a,amin=0.5,res;
for (int k=1; k

перебрось приравнивание из "=" в ":="
ну и подправь вызовы библиотек и их описание

Похожие вопросы