program raf105;
var k,a,p,b,m,let:real;
begin
write('Площадь участка (га.): ');
readln(k);
write('Средняя урожайность с гектара (ц.): ');
readln(a);
write('Увеличение участка за год (% от площади): ');
readln(p);
write('Рост урожайности за год (% от урожайности): ');
readln(b);
write('Желаемый урожай (ц.): ');
readln(m);
while a < m do
begin
k+= (k/100*p);
a+= (a/100*b);
let+= 1;
end;
writeln;
writeln('Желаемая урожайность (',m,' ц.) будет достигнута через ',let,' лет');
writeln('При этом, площадь участка будет составлять примерно ',round(k),' га.');
end.
Язык PascalABC
#include "stdafx.h"
#include "stdio.h"
#include <time.h>
#include <stdlib.h>
class vector
{
private:
int* m;
int size;
public :
vector(int n = 0);
vector(const vector &vector2);
~vector();
};
vector::vector( int n )
{
if (n < 0) n = 0;
size = n;
m = new int[n];
if(!m)
printf("Error");
else
m = NULL;
}
vector::vector(const vector &vector2)
{
size = vector2.size;
m = new int [size];
for(int i = 0; i<size;i++)
m[i] = vector2.m[i];
printf("Hello world !");
}
vector::~vector()
{
delete[] m;
}
vector(int *m, int size)
{
srand(time(NULL))
if(!m)
printf("error")
else
for(int i = 0; i < size; i++)
m[i] = rand()% 99;
}
int main()
{
vector v1(45),
system("pause");
return 0;
}
Объяснение:
x = 9
Объяснение:
12ₓ * 33ₓ = 406ₓ
(1 * x¹ + 2 * x⁰) * (3 * x¹ + 3 * x⁰) = 4 * x² + 0 * x¹ + 6 * x⁰
(1 * x + 2 * 1) * (3 * x + 3 * 1) = 4 * x² + 0 * x + 6 * 1
(x + 2) * (3x + 3) = 4x² + 6
3x² + 6x + 3x + 6 = 4x² + 6
4x² - 3x² - 6x - 3x = 6 - 6
x² - 9x = 0
x * (x - 9) = 0
x - 9 = 0 или x = 0 (не подходит)
x = 9
Проверка:
12₉ = 1 * 9¹ + 2 * 9⁰ = 9 + 2 = 11₁₀
33₉ = 3 * 9¹ + 3 * 9⁰ = 27 + 3 = 30₁₀
406₉ = 4 * 9² + 0 * 9¹ + 6 * 9⁰ = 324 + 0 + 6 = 330₁₀
11 * 30 = 330