Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
FruitAPps
16.11.2020 21:32 •
Информатика
Составить алгоритм и программу для нахождения суммы ряда: s=x^1+x^3+x^5+x^7++x^13
Показать ответ
Ответ:
VeronicaOgne
20.08.2020 18:15
Var
S,x,St:real;
A:integer;
Begin
Write('x = ');
ReadLn(x);
St:=x;
S:=St;
Write(St);
For A:= 1 to 6 do
Begin
St:=St*x*x;
S:=S+St;
Write(' +',St)
End;
WriteLn(' = ',S);
End.
0,0
(0 оценок)
Популярные вопросы: Информатика
nastyalunina22
28.11.2020 19:44
Единицы длины пронумерованы следующим образом: 1 — дециметр, 2 — километр, 3 — метр, 4 — миллиметр, 5 — сантиметр. Дан номер единицы длины (целое число в диапазоне 1–5) и...
ZnayNeZnay
29.07.2021 06:28
Як створюють програми в середовищі виконання алгоритмів Скретч?...
РенаКОСЫРЕВА
29.07.2020 22:42
Каждый из вас, работая с одним и тем же учебником, получает разное количество учебников. как вы можете это объяснить?...
5454540
18.11.2022 02:08
Написать программу. чтоб вводимое число делилось на 2 пока она не станет 0. и пусть ввыведит все деление)...
MOKOV07
18.11.2022 02:08
Имеются два кувшина ёмкостью 3 л и 8 л.написать алгоритм,выполняя который можно набрать из реки 7 л воды....
zaraza8999
03.09.2021 01:27
Назовите имена нескольких объектов: изучаемых на уроке биологии изучаемых на уроке изучаемых на уроке изучаемых на уроке информатике ! !...
anna16191
07.06.2022 04:36
Pascal abc. ввести число умножить его на 2. ввести второе число. отнять от него 10. вывести полученные результаты....
KateDonut1
20.02.2022 12:52
Каждый из вас, работая с одним и тем же учебником, получает разное количество информации, как вы можете это объяснить?...
marusi220
06.01.2020 17:53
Написать программу на pascal дана строка символов s, состоящая максимум из 250 символов. напишите программу, которая проверит является ли строка s палиндромом. примеры палиндромов:...
andreevochir20
06.01.2020 17:53
Электронные часы отображают цифры, как показано на рисунке. сколько цифр невозможно будет определить однозначно, если перегорит средняя горизонтальная перекладина?...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
S,x,St:real;
A:integer;
Begin
Write('x = ');
ReadLn(x);
St:=x;
S:=St;
Write(St);
For A:= 1 to 6 do
Begin
St:=St*x*x;
S:=S+St;
Write(' +',St)
End;
WriteLn(' = ',S);
End.