Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
катя5088
31.01.2022 23:21 •
Информатика
Нужно в паскале abs начав тренировки спортсмен в первый день пробежал 10 км. каждый день он увеличивал дневную норму на 10% нормы предыдущего дня. какой суммарный путь пробежит спортсмен за 7 дней ?
Ответ:
Savosin229
03.07.2020 08:48
Var i:integer; n,k:real;
begin
n:=10;k:=10;
for i:=1 to 6 do
begin
n:=1.1*n;
k:=k+n;
end;
writeln(k:5:2);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
satvika61
20.12.2020 09:03
Дан массив размерностью 5х5. Написать программу подсчета количества элементов массива больших по модулю элемента, стоящего в первой строке и первом столбце....
Reshauvce
18.03.2021 18:18
Какому логическому выражению в условиях задания(см фото) соответствует заштрихованная часть плоскости...
Милана4455
04.02.2023 15:01
Подчеркни лишнее лист бумаги лист берёзы лист пергамента...
vlinkova4
19.06.2020 14:46
Зачетная работа по модулям 1. В нарушении правил обмена валюты подозреваются четыре работника банка А, В,Си D. Известно, что:а) если А не нарушил, то и B не нарушил;б) если...
Thefirstthing
06.02.2023 07:25
1. в корзине лежат грибы: 30 рыжиков и 18 лисичек. какие из высказываний будут истинными? 1) (лисичек больше, чем рыжиков) или (рыжиков меньше 30) 2) (рыжиков больше, чем...
ТАААААААААААПКИ
06.02.2023 07:25
Оператор write на языке pascal означает: 1.ввод с клавиатуры значение переменой 2.вывод на экран информации 3.присваивание переменной значения...
Gjjsg
24.12.2022 16:24
Я хз как я вам в ответ могу с английским я в нем очень хорош...
соня12456
02.01.2021 17:51
Что не так, почему не работает данная программа? program massiv; const n=20; var b: array [-20..n] of integer; i,p,a,d,k,h: integer; begin {ввод массива} write( введите...
16Евгения16
18.02.2020 15:45
Определите, к какой группе относится система счисления с основанием 16....
fefmweoiwefio
23.04.2023 05:27
Укажите наименьшую дробь со знаменателем 7 большую 1/3 но меньшую 2/3...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
begin
n:=10;k:=10;
for i:=1 to 6 do
begin
n:=1.1*n;
k:=k+n;
end;
writeln(k:5:2);
end.