Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.83/6: Рейтинг темы: голосов - 6, средняя оценка - 4.83
Nz
0 / 0 / 1
Регистрация: 03.04.2015
Сообщений: 53
1

Вычисление суммы элементов массива по формуле

11.04.2015, 17:03. Показов 1215. Ответов 6
Метки нет (Все метки)

Программа на языке Паскаль АБС
Даны х1,х2,…,х10.
Определеить

https://www.cyberforum.ru/cgi-bin/latex.cgi?S=\sum_{i=1}^{10}\left(x_i-2 \right)^3+\sum_{i=1}^{10}x^2_i
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
11.04.2015, 17:03
Ответы с готовыми решениями:

Вычисление элементов массива по формуле
составить программу для вычисления элементов вектора x по формуле: x:= ln(sqr(x)) - sqr(ln (...

Вычисление элементов массива по формуле
https://www.cyberforum.ru/attachment.php?attachmentid=116775&stc=1&d=1324943373 помогите с...

Вычисление элементов одномерного массива по формуле
Составить программу для вычисления элементов одномерного массива по формуле: ...

Вычисление элементов одномерного массива по формуле. Как исправить программу?
Составить программу для вычисления элементов одномерного массива по формуле:...

__________________
6
Модератор
63332 / 47044 / 32427
Регистрация: 18.05.2008
Сообщений: 114,031
11.04.2015, 18:48 2
Pascal
1
2
3
4
5
6
7
8
s1:=0;
s2:=0;
for i:=1 to 10 do
 begin
  s1:=s1+sqr(x[i]-2)*(x[i]-2);
  s2:=s2+sqr(x[i]);
 end;
s:=s1+s2;
0
Nz
0 / 0 / 1
Регистрация: 03.04.2015
Сообщений: 53
11.04.2015, 20:18  [ТС] 3
Puporev, а полностью как программа выглядит?
я попытался ее сделать (бегины,вар,обьявление переменных и тд),но почему то не запускается
0
Модератор
63332 / 47044 / 32427
Регистрация: 18.05.2008
Сообщений: 114,031
11.04.2015, 20:34 4
Цитата Сообщение от Nz Посмотреть сообщение
я попытался ее сделать
Ну так покажи...
0
Nz
0 / 0 / 1
Регистрация: 03.04.2015
Сообщений: 53
11.04.2015, 20:46  [ТС] 5
Puporev, так правильно?
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
Program lab4;
var
s:array [1..10] of real;
s1,s2,x,i,m:integer;
begin
s1:=0;
s2:=0;
 for i:=1 to 10 do
begin 
read (s[i]);
end;
begin 
s1:=s1+sqr((x*i)-2)*((x*i)-2);
  s2:=s2+sqr((x*i));
 end;
m:=s1+s2;
writeln ('S= ',m);
end.
Добавлено через 3 минуты
ну так что?

Добавлено через 1 минуту
Цитата Сообщение от Puporev Посмотреть сообщение
Ну так покажи...
ну так что?
0
Модератор
63332 / 47044 / 32427
Регистрация: 18.05.2008
Сообщений: 114,031
11.04.2015, 20:50 6
Лучший ответ Сообщение было отмечено Nz как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
Program lab4;
const n=10;
var x:array [1..n] of real;
    s,s1,s2:real;
    i:byte;
begin
s1:=0;
s2:=0;
for i:=1 to n do
 begin
  write('x[',i,']=');
  readln(x[i]);
  s1:=s1+sqr(x[i]-2)*(x[i]-2);
  s2:=s2+sqr(x[i]);
 end;
s:=s1+s2;
writeln ('S= ',s:0:2);
end.
Добавлено через 30 секунд
Цитата Сообщение от Nz Посмотреть сообщение
ну так что?
Ну, типа ума нет...
1
Nz
0 / 0 / 1
Регистрация: 03.04.2015
Сообщений: 53
11.04.2015, 20:55  [ТС] 7
спасибо)
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
11.04.2015, 20:55

Заказываю контрольные, курсовые, дипломные работы и диссертации здесь.

Вычисление элементов массива по формуле, Поиск максимального элемента массива
Подскажите, пожалуйста, что не так с решением Дано: Составить программу (с использованием...

Ввод элементов массива с клавиатуры, вычисление суммы по формуле, нахождение максимальной суммы
Помогите дополнить код. Нужно, чтоб элементы массива вводились с клавиатуры. Выводилось на экран...

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

Вычисление суммы чисел по формуле без массива
Даны натуральное число n, действительные числа a1,a2,…,an. Постарайтесь обойтись без массивов – в...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
7
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.