Pascal (Паскаль)

Форум программистов и сисадминов Киберфорум

Войти

Регистрация
Восстановить пароль

Другие темы раздела
Pascal Процедуры в паскаль, изменить програму виполнить через процедуру Добрый вечер, помогите пожалуйста отредактировать код, он у меня написан без подпрограммы, а мне нужен через процедуру. Вот условие задачи Поменять местами первый и второй абзац Вашего текста Мой код: https://www.cyberforum.ru/ pascal/ thread2877620.html	Pascal Дан целочисленный массив А [3][3]. Найти сумму положительных элементов, кратных 3. Результат вывести на экран Дан целочисленный массив А . Найти сумму положительных элементов, кратных 3. Результат вывести на экран.
Pascal задача https://www.cyberforum.ru/ pascal/ thread2877575.html написать программу которая введет с клавиатуры список названий учебных предметов случайным образом сгенерировать средний балл по каждому предмету.построить круговую диаграмму по полученным данным	Pascal В массиве из 10 целых чисел (числа вводятся с клавиатуры) найти количество элементов, принадлежащих интервалу [a;b] В массиве из 10 целых чисел (числа вводятся с клавиатуры) найти количество элементов, принадлежащих интервалу . Границы интервала вводятся с клавиатуры. Полученный результат вывести на экран. https://www.cyberforum.ru/ pascal/ thread2877322.html
Pascal Через массив найти мин. и макс. элемент в множестве отрицательных чисел Через массив найти минимальный и максимальный элемент в множестве отрицательных чисел	Pascal Отладка кода Как сделать операторы if рабочими или для типа байт нужны другие ограничения? var x, y: byte; begin if (x>255) then begin repeat writeln('Запишите 3 значной число') until x<255; end; if (y>255) then https://www.cyberforum.ru/ pascal/ thread2877066.html
Pascal Вычислить сумму ряда Написать процедуру (с выходными и входными параметрами) вычислить приближенную сумму при заданных значениях точности и аргумента x. Процедура должна вернуть : значение суммы ряда, последнее учтенное в сумме слагаемое и кол. учтенных слагаемых. Ряд\|Функция и областьсходимости x - x3 / 3! + x5 / 5! - x7 / 7! + ...\|sin x (│x│ < ∞ ) https://www.cyberforum.ru/ pascal/ thread2876928.html	Описание программы Pascal Здравствуйте, помогите пожалуйста словесно описать код, если не сложно Вот сама задача ЗАДАЧА ПОЕЗД "РОССИЯ" Поезд «Москва — Владивосток» следует практически через всю Россию, и потому получил название "Россия". Станции пронумерованы от 1 (Москва) до N (Владивосток). Поезд проезжает станции в порядке возрастания номеров. Во время пути поезда вагоны могут отцепляться и прицепляться....
Pascal В двумерном массиве в каждой строке поменять максимальный элемент с элементом, стоящим на главной диагонали. https://www.cyberforum.ru/ pascal/ thread2876663.html В заданном двумерном массиве чисел в каждой строке поменять максимальный элемент с элементом, стоящим на главной диагонале.	Pascal Вывести строку-описание указанного количества заданий, обеспечив правильное согласование. https://www.cyberforum.ru/ pascal/ thread2876655.html Данное целое число в диапазоне 10-40, определяющее количество учебных заданий по некоторой теме. Вывести строку-описание указанного количества заданий, обеспечив правильное согласование числа со словами «учебное задание», например: 18 - «восемнадцать учебных задач», 23 - «двадцать три учебные задачи», 31 - «тридцать одно учебное задание». PASCAL
Pascal Не используя стандартные функции, вычислить с точностью eps > 0 Помогите в написании программы Не используя стандартные функции, вычислить с точностью eps > 0 Y = cons(x) = 1 - x^2/2! + x^4/4! - … + (〖(-1)〗^n x^2n)/(2n)! + … Считать, что требуемая точность достигнута, если очередное слагаемое по модулю меньше eps; все последующие слагаемые можно уже не учитывать. Вложенные циклы не использовать. Подсказка: в двух разных переменных храните...	Pascal Как читается этот код? var x, y : byte; begin readln(x, y); writeln ((x shr (y-1)) and 1); readln end. https://www.cyberforum.ru/ pascal/ thread2876410.html

Device

0 / 0 / 0

Регистрация: 03.03.2021

Сообщений: 31

Найти ошибку в задании найти сумму - Pascal - Ответ 15742593

01.10.2021, 11:31. Показов 777. Ответов 1

Метки (Все метки)

Author24 — интернет-сервис помощи студентам

Найти сумму y =∑f1/f2, где а ≤ х ≤ b, х меняется с шагом h = c.

Pascal

program lab2;
Var x,y:real;
const xn=-pi; xk=pi; hx=pi/10;
Begin
 y:=0; x:=xn;
 while x<=xk do;
  Begin
   y:=y+sin(x)/x;
   x:=x+hx;
  end;
writeln('y=', y:7:4);
end.

Вернуться к обсуждению:
Найти ошибку в задании найти сумму Pascal

Следующий ответ

Миниатюры

Лучшие ответы (1)

Сообщение: #15742625

Заказать работу у эксперта

Programming

Эксперт

94731 / 64177 / 26122

Регистрация: 12.04.2006

Сообщений: 116,782

01.10.2021, 11:31

Готовые ответы и решения:

Нужно найти ошибку в задании: Найти сумму n первых натуральных четных чисел
Найти сумму n первых натуральных четных чисел

Массивы. Найти среднее арифметическое элементов массива, расположенных до максимального элемента (найти ошибку в задании)
Препод говорит что тут есть ошибка, но где не говорит, прошу если кото-нибуть заметит сообщите. ...

Не могу найти ошибку в задании от CyberBionic
В классе MyClass создать приватное строковое поле с именем name, а затем открытое строковое...

Найти сумму первых n-четных натуральных чисел (найти ошибку)
Нужно найти сумму первых n-четных натуральных чисел. Ошибка вылетает на 13 строке, должно быть я не...

	01.10.2021, 11:31

IT_Exp

Эксперт

87844 / 49110 / 22898

Регистрация: 17.06.2006

Сообщений: 92,604

01.10.2021, 11:31

Помогаю со студенческими работами здесь

Найти сумму целых отрицательных чисел удовлетворяющих условию (найти и исправить ошибку в коде)
#include<iostream> #include<math.h> using namespace std; int main() { int y = 0; ...

Помогите найти ошибку в коде. Найти сумму ряда
Добрый день, помогите найти ошибку. Задача: Найти сумму ряда, вычисление ввести до тех пор пока...

Найти сумму положительных элементов файла, созданного в задании 1, которые при делении на три дают в остатке 2, и полученный результат записать в новы
Найти сумму положительных элементов файла, созданного в задании 1, которые при делении на три дают...

Найти сумму элементов последовательности меньших 3 и произведение элементов больших 10 (не могу найти ошибку)
Дана последовательность чисел из N чисел. Найти сумму чисел меньших 3 и произведение чисел больших...

найти сумму элементов каждой строки матрицы, найти минимальный элемент в каждой строке, найти сумму первого и максимального элемента
программа на делфи. Дана матрица n на m. найти сумму элементов каждой строки, найти минимальный...

Найти ошибку в коде. Не выдаёт сумму
#include "stdafx.h" #include <stdio.h> #include <stdlib.h> #include <math.h> #include...

Вычислить бесконечную сумму: не могу найти ошибку
Вычислить бесконечную сумму S= -x + x^2/(1*2) -x^3/(1*2*3) + x^4/(1*2*3*4)-… т.е. ...

Наверх