Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
костя663
17.01.2020 07:04 •
Информатика
Начав тренировки спортсмен в первый день пробежал 10 км . каждый день он увеличивал на 10% норму от предыдущего дня. какой суммарный путь он пробежит за 7 дней? надо составить алгоритм
Показать ответ
Ответ:
Itupoypomogite1
25.06.2020 14:06
var
i: integer;
d,s: real;
begin
d:= 10;
s:= 10;
for i:=2 to 7 do begin
s:= d*0.1+s;
d:= s;
writeln(s:0:2)
end
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
nnnnnastasi
11.02.2020 12:01
Параметр цикла for в pascalabc.net должен описываться в заголовке цикла. а как убрать ?...
mrgrabik
23.02.2022 21:22
Чтобы в ячейке можно было ввести значение числа с двумя знаками после запятой, какой формат данных необходимо выбрать для ячейк?...
катя5080
07.04.2020 02:42
Составьте программу, которая заполняет массив а[1..10] случайными целыми числами в диапазоне от 10 до 30 и находит максимальный элемент массива и его индекс...
ИльяФеоктистов
08.03.2020 22:20
Дано натаральное число n записать его наоборот (информатика)...
Georgeo19rus
08.01.2020 10:22
Максимальная скорость передачи данных в локальной сети 100 Мбит/с. Сколько страниц текста можно передать за 1 сек, если 1 страница текста содержит 50 строк и на каждой строке...
evenen
03.01.2023 10:50
Какие свойства есть у векторной и растровой графики...
azatnacu
20.12.2021 13:48
Файл пішімдері мен олардың сәйкестік орнат түрлері арасындағы...
Маша270902
14.04.2020 03:39
Составить программу построения графика функции на Pascal...
veronicapcheli
17.05.2021 04:19
Составить блок-схему алгоритма и программу на Паскале для вычисления функций y(x). Ввести программу, вычислить значения функции и проверить ее. В отчет включить блок-схему алгоритма,...
ksysha98090909
28.10.2020 15:29
Как бы объяснил своим одноклассникам то, что узнал об тегрированной среде программирования (IDE)...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
i: integer;
d,s: real;
begin
d:= 10;
s:= 10;
for i:=2 to 7 do begin
s:= d*0.1+s;
d:= s;
writeln(s:0:2)
end
end.