Войти Регистрация Спроси ai-bota

Спортсмен в первый день пробежал К км. Каждый следующий день он увеличивал дневную норму на 10% от нормы предыдущего дня. Какой путь спортсмен пробежит в n-ый день? Определить, через сколько дней спортсмен будет пробегать более M км. На Delphi

Нажмите на рекламу ниже и сразу увидите ответ

↓

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

Yana7112

13.06.2022 06:09

Чем вы можете объяснить разнообразие форматов графических файлов !...

ПомошницаНомер1

15.02.2023 17:43

Должнона туристы переставили лежаки так, как показано ка рисунке. какая команда пропущена (заменена знаком вопроса) в алгоритме расстановки лежаков к первоначальному виду...

Фиалка2017

29.11.2022 13:08

Составить программу нахождения дискриминанта квадратного трёхчлена а.в,c - вводимых с клавиатуры...

kirtema43

29.11.2022 13:08

Мне надо собрать слово из этих букв вззеад...

zhilkinatata

28.09.2020 10:33

Склавиатуры вводятся два числа. составить программу сравнивающую эти числа и в зависимости от результата сравнения выводящую на экран нужный знак.например: 3 5 или 3=3 или...

Никита256366

08.07.2021 17:18

Синформатикой,ту массивы на языке паскаль. задайте массив из 10 элементов с датчика случайных чисел.замените нулем элементы массива,которые больше введенного с клавиатуры числа...

кулибяка2

28.09.2020 07:35

:(* 1)даны две точки на плоскости. запишите алгоритм , позволяющий определить, какая на них находиться ближе к началу координат. 2) запишите алгоритм, позволяющий определить...

DizzyWarriorr

28.09.2020 07:35

Написать программу в паскале: дано трехзначное число. найти число, полученное перестановкой первой и третьей цифры заданного числа....

Alina29052006

06.10.2020 08:34

Как представлено число 502 в 10 системе счисления в шестнадцатеричной системе счисления? заранее ! )...

skey16

06.10.2020 08:34

ответьте на вопросы(коротко) 1)какие преимущества может дать обработка информации с электронных таблиц по сравнению с обработкой вручную? 2)в каких областях деятельности человека...

Ответ:

Evloevakhava

20.10.2020 08:01

var a:real;

i:integer;

begin

a:=10;

for i:=1 to 7 do

begin

a:=a+(a*0.1);

end;

write(a,' ');

end.var a:real;

i:integer;

begin

a:=10;

for i:=1 to 7 do

begin

a:=a+(a*0.1);

end;

write(a,' ');

end.

Объяснение:

0,0(0 оценок)

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку