Мы проходили тему программирование и я не поняла тему ну мы там в столбик писали program uar begin write readln end. нужна такоё 1) f=x^3+2/y 2)f=(a+b)^2/a-1
1) var x,y,F:real; begin write('Введите x '); readln(x); write('Введите y '); readln(y); if (y>0) then F:=x*x*x+2/y writeln('F=',F) end. Как-то так наверн :)
2) var a,b,F:real; begin write('Введите a '); readln(a); write('Введите b '); readln(b); if(a>1) then sqr(a+b)/a-1 writeln('F=',F) end.
Наполняем девятилитровое ведро. В пятилитровом теперь - 0 л, в девятилитровом - 9. Переливаем в пятилитровое. В пятилитровом теперь - 5 л, в девятилитровом - 4. Опустошаем пятилитровое В пятилитровом теперь - 0 л, в девятилитровом - 4. Переливаем из девятилитрового в пятилитровое. В пятилитровом теперь - 4 л, в девятилитровом - 0. Наполняем девятилитровое. В пятилитровом теперь - 5 л, в девятилитровом - 8. Опустошаем пятилитровое ведро. В пятилитровом теперь - 0 л, в девятилитровом - 8. Переливаем из девятилитрового в пятилитровое ведро. В пятилитровом теперь - 5 л, в девятилитровом - 3. Опустошаем пятилитровое. Остается во втором ведре ровно 3 литра.
Суть нужного алгоритма в следующем: Заводим массив из 21 члена. Первый член будет соответствовать первой ступени. Приравняем его значение к единицы. Таким образом для каждой ступени будем считать количество вариантов на неё попадания. Для каждой ступени это будет суммой предыдущих двух членов. То есть a[0]=1, тогда: a[1]=1 //на первую ступень можно попасть одним a[2]=1+1=2 //на вторую ступень двумя - с нулевой и с первой a[3]=2+1=3 //на третью ступень можно попасть либо с первой, либо со второй, на которую в свою очередь можно попасть двумя a[4]=3+2=5 a[5]=5+3=8 и так далее
Заметим, что это последовательность Фибоначчи. Тогда решением будет 21-й член этой прогрессии. Можно посчитать вручную, либо через программу. ответ 10 946.
var x,y,F:real;
begin
write('Введите x ');
readln(x);
write('Введите y ');
readln(y);
if (y>0) then F:=x*x*x+2/y
writeln('F=',F)
end.
Как-то так наверн :)
2)
var a,b,F:real;
begin
write('Введите a ');
readln(a);
write('Введите b ');
readln(b);
if(a>1) then sqr(a+b)/a-1
writeln('F=',F)
end.