Program p1;
var a,b:integer;
i,n,x:integer;
begin
Writeln ('Введите к-во');
readln (n);
x:=0;
for i:=1 to n do
begin
Writeln ('Введите число:');
readln (a);
if a>=0 then
begin
if x=0 then b:=a;
if (x>0) and (a<b) then b:=a;
x:=x+1;
end;
end;
Writeln('Наименьшего положительного число: ',b);
<span>end.</span>
Ответ:
#include <iostream>
using namespace std;
int main()
{
unsigned long p, pp;
int F, n, i;
setlocale(LC_ALL, "russian");
cout << "Население = ";
cin >> p;
cout << "Прирост = ";
cin >> F;
cout << "n = ";
cin >> n;
i = 0;
pp = p;
while (pp < p * n) {
pp += (int) pp / F;
i++;
}
cout << "\nЧерез " << i << " лет";
}
Карта местности
а модель
схема прибора
#include <iostream>
#include <cmath>
double FUNCTION_Z(int a, int x);
int main()
{
int a, x;
std::cin >> a >> x;
double Z = FUNCTION_Z(a, x);
std::cout << "Z = " << Z << std::endl;
}
double FUNCTION_Z(int a, int x)
{
if (x > a)
return a*(x + sqrt(x));
else
return a - x*sqrt(x);
}