
Вопрос задан 15.01.2019 в 06:22.
Предмет Информатика.
Спрашивает Сидоров Дима.
ПОМОГИТЕ С ПАСКАЛЕМ, СПАСИТЕ. НУЖНО НАПИСАТЬ ПРОГРАММУ.. очень прошу помогите написать. задание на
картинке


Ответы на вопрос

Отвечает Вишня Ева.
// PascalABC.NET 3.2, сборка 1404 от 16.03.2017
// Внимание! Если программа не работает, обновите версию!
begin
var k:=Trunc((1.3-1)/0.05)+1;
for var i:=1 to k do begin
var a:=1+0.05*(i-1);
var f:=a+2.0;
for var n:=2 to 5 do f+=power((a+n),n);
Writeln(a:4:2,f:18:9)
end
end.
Результат
1.00 8477.000000000
1.05 8834.605319063
1.10 9204.114110000
1.15 9585.819144688
1.20 9980.017920000
1.25 10387.012695313
1.30 10807.110530000


Топ вопросов за вчера в категории Информатика

Информатика 566

Информатика 25

Информатика 22

Информатика 27

Информатика 34

Информатика 58

Информатика 63

Информатика 23
Последние заданные вопросы в категории Информатика
Предметы
-
Математика
-
Литература
-
Алгебра
-
Русский язык
-
Геометрия
-
Английский язык
-
Химия
-
Физика
-
Биология
-
Другие предметы
-
История
-
Обществознание
-
Окружающий мир
-
География
-
Українська мова
-
Информатика
-
Українська література
-
Қазақ тiлi
-
Экономика
-
Музыка
-
Право
-
Беларуская мова
-
Французский язык
-
Немецкий язык
-
МХК
-
ОБЖ
-
Психология
-
Физкультура и спорт
-
Астрономия
-
Кыргыз тили
-
Оʻzbek tili