Var x,z,k:integer;begin
writeln ('введите число');readln(x);k:=0;while x<>0 dobeginz:=x mod 10;x:=x div 10;if x mod 2=0 thenk:=k+1;end;writeln('кол-во чётных чисел :',k);end.
если по логике то должно получится 2064, а это 2 килобайта 16 байт = 2,16 килобайт.
#include <iostream>
#include <cmath>
using namespace std;
int main() {
int n=0;
cin>>n;
long long nn=pow(n,2);
cout<<nn<<endl;
while(nn!=0)
{
if(nn%10==6){cout<<"DA"; break;}
nn/=10;
}
if(nn==0)cout<<"NET";
return 0;
}
Как-то так, прилагаю и сам сpp-файл :)
#include<stdio.h>#include<math.h>
const double EPS = 1e-4;
double f(double x){ return 3*x - 4 * log(x) - 5;}
double fp(double x){ return 3 - 4 * (1/x);}
int main(){ double prev = 2, cur; //prev - x (k-1)ое, cur - x k-тое cur = prev - f(prev)/fp(prev); while(abs(cur - prev) > EPS) { prev = cur; cur = cur - f(cur)/fp(cur); }
printf("%lf\n", cur); return 0;}