Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
Другие темы раздела
Pascal ABC Почему не работает программа? https://www.cyberforum.ru/ pascalabc/ thread1418487.html
Пишет ошибку,почему? uses crt; var n,i,dl,ball1,ball2:integer; a:string; begin ClrScr; Write(' Введите количество человек: '); readln(i); for n:=1 to 1 do begin dl:=12;
Pascal ABC Интегралы. Составить рекурсивную функцию с понижением порядка первообразной функции
int x^m*sin(alpha*x)dx = система ур-ий: -(x^m/alpha)*cos(alpha*x)+ m/alpha*int x^(m-1)*cos(alpha*x)dx, если m>=1 -(cos(alpha*x)/alpha)+ C, если m=0. Решить интеграл, используя косвенную рекурсию. Буду очень благодарен за помощь! Входными параметрами задачи являются пределы интегрирования alpha и beta и показатель степени m. Выходной параметр - значение определенного интеграла.
Pascal ABC Взять попарную сумму элементов главной и побочной диагоналей За вектор X взять первый по порядку в обратном порядке столбец матрицы с наименьшей суммой его элементов, если его максимальный элемент находится на непарной позиции, иначе за вектор X взять попарную сумму элементов главной и побочной диагоналей. https://www.cyberforum.ru/ pascalabc/ thread1418428.html Pascal ABC Интерполяция функции одной переменной алгоритм прилагается Проведите интерполяцию результатов эксперимента y(x) x 0.50 0.55 0.59 0.73 0.88 0.93 0.95 1.05 1.07 1.13 y 1.02 1.12 1.25 1.34 1.40 1.55 1.55 1.62 1.71 1.88 многочленом 1-го порядка методом наименьших квадратов. Вычислите функцию y (x) = a1 + a2 * x при значении аргумента х = 0.9. Представьте значение функции на экране монитора и в текстовом файле с не менее 6 знаками после запятой.... https://www.cyberforum.ru/ pascalabc/ thread1418304.html
Pascal ABC Сгруппировать числа по порядку
Студент выписал из журнала оценки: 4,4,3,2,5,3,3,4,5,4,4,4,5,4,2,4,4,5,3,3. 1-НУЖНО СГРУППИРОВАТЬ числа по порядку: 2,2,3,3,3,3,3,4,4,4,4,4,4,4,4,4,5,5,5,5 2-чтобы программа выдала число, которая встречается больше всего т.е. 4 3-вывести среднюю оценку
Pascal ABC Вывести на экран название передачи, которая транслируется в заданный день и в заданное время Дана программа телепередач на неделю. Вывести на экран название передачи,которая транслируется в заданный день и в заданное время. https://www.cyberforum.ru/ pascalabc/ thread1418018.html
Pascal ABC Нужны примеры анимации Пожалуйста, дайте пару анимаций, хочу научиться и понять что да как. https://www.cyberforum.ru/ pascalabc/ thread1417980.html Записать элементы массива в обратном порядке Pascal ABC
Записать элементы массива в обратном порядке
Pascal ABC Подсчитать количество строк в файле https://www.cyberforum.ru/ pascalabc/ thread1417803.html
Всем привет. Как можно подсчитать кол-во строк в файле? Мне надо просуммировать числа из одного файла и записать в другой. В первом файле по одному числу на строку. Пример: 3 4 5 7 3 Я считаю readln(f1,n); Так правильно считать? uses crt; var f1,f2:text;
Pascal ABC Вычислить log5(x)-1\5e^x https://www.cyberforum.ru/ pascalabc/ thread1417793.html
Ссылка удалена. Она нарушает Правила
По заданным 10 положительным числам нарисуйте столбиковую диаграмму Pascal ABC
По заданным 10 положительным числам (взять самостоятельно) нарисуйте столбиковую диаграмму (пистограмму). Столбики должны быть нарисованы разными цветами. Масштаб диаграммы произвольный
Pascal ABC Вычислить значение выражения https://www.cyberforum.ru/ pascalabc/ thread1417605.html
Даны натуральное число n, действительные числа x1, ..., xn. Вычислить (см. изобр.):
Nz
0 / 0 / 1
Регистрация: 03.04.2015
Сообщений: 53
11.04.2015, 20:46  [ТС] 0

Вычисление суммы элементов массива по формуле - Pascal ABC - Ответ 7467466

11.04.2015, 20:46. Показов 1537. Ответов 6
Метки (Все метки)

Ответ

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 Посмотреть сообщение
Ну так покажи...
ну так что?

Вернуться к обсуждению:
Вычисление суммы элементов массива по формуле Pascal ABC
0
Заказать работу у эксперта
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
11.04.2015, 20:46
Готовые ответы и решения:

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

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

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

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

6
11.04.2015, 20:46
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
11.04.2015, 20:46
Помогаю со студенческими работами здесь

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

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

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

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

0
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru