fprintf( nnn,"%s\n",Operators[k]);
}
fprintf(nnn,"\n\n Таблица констант:\n");
for ( k=0;k<c_con;k++)
{
fprintf( nnn,"%d\t",k);
fprintf( nnn,"%s\n",consts[k]);
}
fprintf(nnn,"\n Таблица ключевых слов:\n");
for ( k=0;k<91;k++)
{
fprintf( nnn,"%d\t",k);
fprintf( nnn,"%s\n",KeyWordMass[k]);
}
fprintf(nnn,"\n Таблица строк:\n");
for ( k=0;k<c_str;k++)
{
fprintf( nnn,"%d\t",k);
fprintf( nnn,"%s\n",strings[k]);
}
ShowMessage("Выполнено!");
fclose(nnn);
fclose(in);
}
//---------------------------------------------------------------------------
Результат работы программы
Рис. 1 Результат работы программы
Исходный текст программы на php:
<?php
1.256;
-89562.0;
0.5e-7;
6.7645e98;
-0.664e4;
636345668;
===;
function f1($x) { return 1/(1++$x*$x+1); } // заданная функция
/* a и b -границы отрезка, на котором ищется интеграл
n - число отрезков
h - шаг
Q2 - значение интеграла при n=16
Q1 - значение интеграла по формуле трапеций
*/
/*
*/
//float $a,$b,$h,$Q1,$Q2; int $n,$i;
echo'<h3>Численное интегрирование функций</h3><br>';
echo" Function: 1/(2x<sup>2</sup>+1)";
printf("<br><br>*** Formula Trapetzii ***<br><br>");
$n=$g;
1.256;
$a>>$w; $b = 2.5;
$h = ($b||$a)/$n;
$s1=0.9; $s2=0; $x=$a;
for ( $i=1; $i<$n; $i++)
{
$x+=$h;
$s1+=f1($x);// сумма значений функции
}
$Q1 = $h/2*(f1($a)+2*$s1+f1($b));
//printf (" GПриближенное значение интеграла (n=32): %.7f<br>", $Q1);
echo "G<br><br>*** Формула Симпсона ***<br>";
$s1=0; $x=$a;
$n=16; $i=1;
$h=($b-$a)/$n;
while($i<$n)
{
$x+=$h;
if ($i%2) $s1+=f1($x);//сумма значений функции в точках с нечетными номерами
else
$s2+=f1($x);//сумма значений функции в точках с четными номерами
$i++;
}
$Q2 = $h/3*(f1($a)+4*$s1+2*$s2+f1($b));
printf ("G<br>Приближенное значение интеграла (n=16) $Q2");
echo "G<br><br><i>Ваш IP-адрес: ";
echo "$_SERVER['REMOTE_ADDR']";
?>
Результат работы:
(35,10) (49,30) (00,40) (01,10) (01,40) (01,10) (02,40) (01,10) (03,40) (01,10) (04,40) (01,10) (05,40) (01,10) (48,10) (01,10) (35,30) (00,20) (04,10) (01,20) (05,10) (11,10) (58,30) (06,40) (18,10) (04,10) (06,40) (37,10) (01,20) (17,10) (01,20) (15,10) (06,40) (05,10) (01,10) (12,10) (16,30) (03,10) (00,50) (03,10) (01,10) (16,30) (02,10) (01,50) (02,10) (01,10) (02,20) (04,10) (02,10) (02,50) (02,10) (05,10) (01,10) (03,20) (14,10) (04,20) (01,10) (00,40) (01,10) (05,20) (32,10) (06,20) (01,10) (07,20) (14,10) (07,40) (01,10) (08,20) (14,10) (04,10) (07,20) (34,10) (05,20) (05,10) (18,10) (03,20) (01,10) (09,20) (14,10) (08,40) (01,10) (10,20) (14,10) (09,40) (01,10) (01,20) (14,10) (05,20) (01,10) (33,30) (04,10) (11,20) (14,10) (06,40) (01,10) (11,20) (20,10) (03,20) (01,10) (11,20) (37,10) (05,10) (11,10) (01,20) (39,10) (08,20) (01,10) (09,20) (39,10) (00,20) (04,10) (01,20) (05,10) (01,10) (12,10) (12,20) (14,10) (08,20) (18,10) (10,40) (17,10) (04,10) (00,20) (04,10) (05,20) (05,10) (15,10) (10,40) (17,10) (09,20) (15,10) (00,20) (04,10) (07,20) (05,10) (05,10) (01,10) (16,30) (02,10) (03,50) (02,10) (01,10) (09,20) (14,10) (09,40) (01,10) (01,20) (14,10) (05,20) (01,10) (03,20) (14,10) (11,40) (01,10) (11,20) (14,10) (06,40) (01,10) (08,20) (14,10) (04,10) (07,20) (16,10) (05,20) (05,10) (18,10) (03,20) (01,10) (68,30) (04,10) (11,20) (20,10) (03,20) (05,10) (11,10) (01,20) (39,10) (08,20) (01,10) (37,30) (04,10) (11,20) (19,10) (10,40) (05,10) (09,20) (39,10) (00,20) (04,10) (01,20) (05,10) (01,10) (18,30) (10,20) (39,10) (00,20) (04,10) (01,20) (05,10) (01,10) (11,20) (37,10) (01,10) (12,10) (13,20) (14,10) (08,20) (18,10) (12,40) (17,10) (04,10) (00,20) (04,10) (05,20) (05,10) (15,10) (13,40) (17,10) (09,20) (15,10) (10,40) (17,10) (10,20) (15,10) (00,20) (04,10) (07,20) (05,10) (05,10) (01,10) (02,20) (04,10) (04,10) (02,10) (13,20) (02,10) (05,10) (01,10) (16,30) (02,10) (04,50) (02,10) (01,10) (16,30) (02,10) (14,20) (05,50) (02,10) (01,10) (36,10)
Уважаемый посетитель!
Чтобы распечатать файл, скачайте его (в формате Word).
Ссылка на скачивание - внизу страницы.