Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
Другие темы раздела
Pascal Вывести среднюю температуру по всем дням марта Дан целочисленный массив из 31 элемента, в котором записаны значения температуры в марте. Элементы массива могут принимать значения от (-20) до 20. Вывести среднюю температуру по всем дням, когда была оттепель. https://www.cyberforum.ru/ pascal/ thread94104.html Pascal Определить, имеется ли среди чисел a, b, c хотя бы одна пара взаимно противоположных чисел
.Определить, имеется ли среди чисел a, b, c хотя бы одна пара взаимно противоположных чисел.
Pascal уроки https://www.cyberforum.ru/ pascal/ thread94089.html
Написать программу, которая по заданному номеру дня недели (целому числу от 1 до 7) выводит на экран количество уроков в этот день.
Pascal Возведение в куб Написать программу, которая по заданным трем действительным числам возводит в куб те из них, значения которых неотрицательны, и в четвертую степень – отри¬цательные. https://www.cyberforum.ru/ pascal/ thread94088.html
Вычисление выражения Pascal
y=exp(5*ln(x))*exp(2*(sin(exp(3*ln(x+b))/cos(exp(3*ln(x+b)))+(x-5)/exp(3*ln(x+b)) решите пожалуйса...
Pascal Работа с записями https://www.cyberforum.ru/ pascal/ thread94057.html
Заполнить записи для 5 студентов, которые содержат поля: fio: string; faculty:string; group:1..6; address: record k: longint; city: string; street: string; house, flat:integer;
Pascal По заданным вещественным числам a(0),a(1) ,...,a(20), T вычислить значения многочлена a(20)*x^20+a(19)*x^19+...+a(1)*x+a(0) и значение его производной По заданным вещественным числам a(0),a(1) ,...,a(20), T вычислить значения многочлена a(20)*x^20+a(19)*x^19+...+a(1)*x+a(0) и значение его производной в точке x=T. Какие изменения надо внести в программу чтобы она правильно выполнялась для многочлена 45-й степени? https://www.cyberforum.ru/ pascal/ thread94028.html Pascal Метод дихотомии
Помогите, пожалуйста, с задачей.(ОДНОМЕРНАЯ ОПТИМИЗАЦИЯ ФУНКЦИИ МЕТОДОМ НУЛЕВОГО ПОРЯДКА-методом дихотомии). Задание: 1 Определить координаты экстремальной точки унимодальной функции f(x)=5*x2+15*x+0,5 методом дихотомии, с точностью е=0,01 2 Определить тип найденного экстремума 3 Построить блок-схему алгоритма поиска экстремума П Поиск экстремума провести в диапазоне от -1060 до 1050.
Pascal Вычисление интеграла паскаль Решить уравнение f(x)=x методом итерации,вычислить итеграл от а до b F(x)dx метдм трапеции вот формула по которой можно можно найти интеграл методом трапеции n=(b-a)/n-если используем n трапеций площадь трапеции---S1=1/2 (вот полная формула в предыдущей я раскрыл скобки -------S[1/2(f(a)+f(b))+f(a+h)+f(a+2h)+......+f(a+(n-1)h)}h ) Программу продумал понимаю как на должна работать... https://www.cyberforum.ru/ pascal/ thread94004.html Pascal ромб https://www.cyberforum.ru/ pascal/ thread94001.html
Как нарисовать ромб...????
Pascal Создать матрицу из наибольших элементов трех матриц.
Вот такая задачка. помогите решить пожалуйста:scratch: По трем заданным матрицам A(N,N),B(N,N) и C(N,N) постройте матрицу X того же размера, каждый элемент которой вычисляется по формуле x=max{a,b,c}
Pascal Вывести количество элементов массива которые большего среднего значения массива 1) Вообщем задача звучит так: Дан целочисленный массив из 30 элементов.Элементы массива могут принимать целые значения от 0 до 100 - баллы учащихся выпускного теста. Нужен алгоритм который выведет количество учащийся балл которых больше среднего балла в классе. Запрещается использовать переменные не описанные ниже, но можно не использовать часть из них. Const N=30; var a:array of... https://www.cyberforum.ru/ pascal/ thread93994.html
117 / 114 / 89
Регистрация: 31.10.2009
Сообщений: 191
10.02.2010, 21:56 0

Найти сумму вычисленных значений функции - Pascal - Ответ 536247

10.02.2010, 21:56. Показов 1678. Ответов 4
Метки (Все метки)

Ответ

2.
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
const
 n = 8;
var
 a: array[1..n,1..n] of integer;
 i,i2:integer;
begin
 for i:= 1 to n do
   for i2:= 1 to n do
     readln(a[i,i2]);
 for i:= 1 to n do
   for i2:= 1 to n do begin
     if (a[i,i2] <> 0) then
       break;
     if (i2 = n)  then
       writeln(i);
   end;
end.
Добавлено через 13 минут

Не по теме:

ой... токо заметил что она уже была решена :wall:



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

Найти произведение вычисленных значений функций
Найти произведение вычисленных значений функций f(x), дробная часть которых &lt; 0,5....

Среди вычисленных значений найти наибольшее, наименьшее и ближайшее к какому-либо целому
Дано целое n&gt;0 вещественное x.среди чисел вида ai=e^cosx2i * sin x^3i, i=1,2...,n найти...

Найти сумму отрицательных значений функции
Найти сумму отрицательных значений функции z = \sin{(5 - x)}/\sin{(x - 2)} для X, изменяющегося на...

Найти сумму всех значений функции
Используя ф-цию F(x)= 9*\cos {x}^{2}, построить массив с элементами {y}_{k}=F(k). Найти: 1)...

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

Найти сумму вычисленных значений функции, имеющих дробную часть
2 задача:y=e^-2x*Cos^2*(2Пx-30градусов).Найти сумму вычисленных значений функции,имющих дробную...

Цикл: найти среднее арифметическое вычисленных значений функции
Найти среднее арифметическое вычисленных значений функции, абсолютное значение которых &lt;3. ...

Найти сумму вычисленных значений функции
Найти сумму вычисленных значений функции f(x). Задание: 1. Из таблицы выбрать вариант задания....

Найти сумму вычисленных значений функции f(x), целая часть которых кратна 2
Найти сумму вычисленных значений функции f(x), целая часть которых кратна 2....

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