Программа без использования функции возведения в степень (pow()):
#include <stdio.h>
int main(void) {
float eps, a, s=0;
int a2=1, a3=1;
printf("eps = ");
scanf("%f",&eps);
a = 1.0/a2+1.0/a3;
while (a>=eps){
a2 *= 2; a3 *= 3;
a = 1.0/a2+1.0/a3;
s += a;
}
printf("s = %lf\n", s);
return 0;
}
Пример:
<span>eps = 0.001
s = 1.499015</span>
//PascalABC
var
a, b, c, P, S : real;
begin
write('Введите длину стороны A> ');
readln(A);
write('Введите длину стороны B> ');
readln(B);
write('Введите длину стороны C> ');
readln(C);
writeln('Вычисление по формуле Герона');
P := (A + B + C) / 2;
S := sqrt(P * (P - A) * (P - B) * (P - C));
writeln('Площадь треугольника S = ', S);
end.
#include <iostream>
using namespace std;
int main() {
int n, k=0;
cin>>n;
int arr[n];
for (int i=0; i<n; ++i) {cin>>arr[i]; if (arr[i]%2==0&&(arr[i]<arr[k]||arr[k]%2==1)) k=i;}
cout<<arr[k];
return 0;
}
Var
x, a, s: real;
n, i: integer;
begin
write('Введите x и n ');
readln(x, n);
a := 1;
s := a;
for i := 1 to n do
begin
a := a * (-1) * x * x / (2 * i - 1) / (2 * i);
s := s + a;
end;
writeln('S = ', s:10:3);
end.