или ? Пусть будет 2-й вариант...
Будем использовать итерационную формулу Герона:
------------
#include <iostream>
#define MOD(x) ((x) > 0 ? (x) : -(x))
using namespace std;
int main()
{
double x, a = 1;
cout << "Input x: ";
cin >> x;
// Здесь можно задать бОльшую точность
while (MOD(a * a - x) > 0.0001)
a = 0.5 * (a - x / a);
cout << "y = " << a - 1 << endl;
}
№ 2
var
n,i,j:integer;
s,s1:string;
begin
readln(S);
for n:=1 to 9 do
begin
str(n,s1);
for i:=1 to length(S) do
if s[i]=s1 then
inc(j);
writeln('Цифр ',n,' всего ',j);
j:=0;
end;end.
<span>№4
</span>var
<span>a:array[1..100] of integer;
kmax,max,i,n:integer;
begin
readln(n);
read (a[1]);
max:=a[1];
kmax:=1;
for i:=2 to n do
begin
read(a[i]);
if a[i]=max then
inc(kmax);
if a[i]>max then
begin
max:=a[i];
kmax:=1;
end;
end;
writeln;
writeln('Максимальное число =',max,' В массиве оно встречается ',kmax,' раз');
<span>end.</span></span>
var a,s:real;
b:integer;
begin
s:=0;
for b:=1 to 5 do begin
writeln('Введите оценку:');
read(a);
s:=s+a;
end;
s:=s/5;
writeln('Средний балл:',s);
end.
1) а = 14, в = 42,
2) с = 9