1. Информатика
  2. На каждом следующем дне рождении

На каждом следующем дне рождении винни съедает столько же меда, сколько съел на двух предыдущих вместе. на двух первых днях рождения у пяточка и кролика он съел по 0,1 кг меда. определить, сколько кг меда он съест на десятом дне рождении. программа должна быть написана с цикла в паскале.

kosonogova kosonogova    2   11.06.2019 04:40    0

Ответы
michukdblack michukdblack  09.07.2020 09:19
Var
  i:integer;
  s,p,p1:real;
begin
p:=0.1;
p1:=0.1;
for i:=3 to 10 do
begin
  s:=p1+p;
  p1:=p;
  p:=s;
end;
writeln('ответ: ',s);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
сом38 сом38  22.05.2019 12:58
Решить систему уравнений (с проверкой) в pascal abc [tex]\left \{ {{ax-by=1} \atop {bx+ay=1}} \right.[/tex] значения коэффициентов a и b задать самостоятельно....
07090702 07090702  17.09.2019 08:40
Составить программу по информатике pascal abc. составьте пример для первоклассника если он решит его правильно то молодец а если нет то плохо....
irinamazda irinamazda  17.09.2019 08:40
Как нарисовать шестиугольник в paint?...
kurzaevaelenka kurzaevaelenka  24.08.2019 17:40
Выяснить можно ли построить треугольник с тремя данными сторонами. условие b+с а и а+с b и а+b с. стороны вводятся с клавиатуры. в паскале...
DaryaKareva DaryaKareva  24.08.2019 17:40
Система счисления – двоичная 1) переведите число 43 из десятичной в двоичную 2) переведите число 345 из десятичной в двоичную 3) переведите число 10000 из двоичной в десятичную...
228778anonim228778 228778anonim228778  24.08.2019 17:40
Найдите стороны треугольника, если известны а и и угол а между ними (угол задан в градусах) pascal...
TTpo100y4eHuk TTpo100y4eHuk  21.04.2021 17:19
документ в 8-битной кодировке имеет объем в 45 мбайт. каждому сотруднику выделен 1 лист этого документа, содержащий 48 строк по 64 символа в каждой строке. определите количества...
Mirgorodska Mirgorodska  21.04.2021 17:19
циклічних(повторювати поки) та умовних(якщо) команд, змінювати костюми залежно від положення(Y 0 - перший; Y 0 - Другий; X 0 - третій; X 0 - четвертий). Оцінюється вміння користування...
СоняКот2000 СоняКот2000  21.04.2021 17:18
Вставь пропущенные слова . Любую интеллектуальную собственность , изобретение можно защитить от копирования , распространения или изменения , такой защиты информации называется...
lunenko2005 lunenko2005  10.05.2021 22:27
. Программа. По заданным 4-ем элементным целым массивам a, b, c вычислить: max (a[ i ]+b[ i ]), max (a[ i ]+c[ i ]), max (b[ i ]+c[ i ])...

Популярные вопросы