|
|
| Другие темы раздела | |
| Pascal Определить, есть в массиве элементы с одинаковыми значениями, обязательно стоящие рядом Прошу помощи! Я молодей студент, помогите написать программу:Определить, есть в массиве элементы с одинаковыми значениями, стоящие рядом на паскале!! Нужно вывести их номера в массиве! https://www.cyberforum.ru/ pascal/ thread1687252.html |
Pascal Выяснить, что целая и дробная части заданного вещественного числа одинаковы Составить программу, выводящую значение TRUE, если указанное высказывание является истинным, и FALSE в противном случае. Целая и дробная части заданного вещественного числа одинаковы. |
|
Pascal Не получается выполнить,если не сложно,то сделайте !
https://www.cyberforum.ru/ pascal/ thread1686803.html ПАСКАЛЬ ! 1)Найти сумму всех целых чисел от a до 1024 (a<500) кратных 14, но не кратных 23 . 2)Найти количество нечетных двузначных чисел,которые делятся на 7 и на 3 . 3)Вычислите : 3+9+15+21+...<100. |
Pascal Вычислить сумму квадратов всех целых чисел, меньших заданного числа
https://www.cyberforum.ru/ pascal/ thread1686547.html Здравствуйте. Помогите решить задачи в Паскаль. Надо ввести с клавиатуры целое число, если число отрицательное, то уменьшить его на 10 и вывести на экран, указав, что оно отрицательное. Это первая задача. Вторая: составить программу, которая выведет на экран первые 15 элементов следующей последовательности:1, 2, 4, 7, 11, 16. Вычислить сумму квадратов всех целых чисел, меньших заданного числа А.... |
|
Pascal Найти наименьшую из сумм элементов строк и сумму наименьших элементов столбцов матрицы Дана вещественная матрица A размеров 5*4. Найти наименьшую из сумм элементов строк матрицы и сумму наименьших элементов столбцов |
Pascal Использование методов сортировки
https://www.cyberforum.ru/ pascal/ thread1686421.html Помогите, пожалуйста, составить программу. Дан массив А(А1,А2,…,А24). Вычислить сумму S= а1 а2 а3 а4+а5 а6 а7 а 8+…+а21 а22 а23 а24. Все элементы массива сортируйте по убыванию. |
|
Pascal Комментарии к коду
https://www.cyberforum.ru/ pascal/ thread1686311.html Здравствуйте, уважаемые. Код к задаче уже готов, но для понимания необходимы построчные объяснения. Вот условие задачи: Сформировать список вещественных чисел и вычислить сумму. Вот код: Type spisok=^s; s=record n:real; next:spisok; end; var s1,s2,t,vs1,vs2,s3:spisok; i,min,minvs,obm:integer; |
Определить какая из точек A(x1, y1, z1), B(x2, y2, z2) ближе расположена к точке С(x3, y3, z3) Pascal написать программу решения следующей задачи: определить какая из точек A (x1, y1, z1) или B (x2, y2, z2) ближе расположена к точке С (x3, y3, z3). Ребят буду ооооочень признателен и благодарен написавшему эту программу на языке паскаль). |
| Pascal Ошибка в коде Здравствуйте, уважаемые форумчане. Помогите исправить ошибку в данном коде: Type spisok=^s; s=record n:real; next:spisok; end; var s1,s2,t,vs1,vs2,s3:spisok; i,min,minvs,obm:integer; sum:real; https://www.cyberforum.ru/ pascal/ thread1686216.html |
Pascal Наименьшее общее кратное 3х чисел
https://www.cyberforum.ru/ pascal/ thread1686111.html program nodnok; procedure Nok_3(a,b,c:integer); function NOD(m,n:integer):integer; begin If m<>0 then NOD:=NOD(n mod m,m) else NOD:=n; end; function NOK(m,n:integer):integer; begin NOK:=(m div NOD (m,n))*n; end; |
|
Заменить нулями элементы массива, расположенные между первым min и последним max элементами Pascal Заменить нулями элементы массива, которые расположены между первым минимальным и последним максимальным элементами массива. const n=10; var a:array of integer; i,min,max,n:integer; begin randomize; for i := 1 to n do begin |
Pascal Работа с процедурами
https://www.cyberforum.ru/ pascal/ thread1685917.html Вроде сделал всё правильно, но выдаёт ошибку при компиляции Type masInt=array of integer; Var a:array of integer; i,j,na,ma,n,m:integer; flag,flagx:boolean; x:masInt; procedure check(var n,m:integer; flagx:boolean; var x:masInt); var i1,j1:integer; |
|
318 / 208 / 162
Регистрация: 08.12.2015
Сообщений: 863
|
|
| 17.03.2016, 18:40 | 0 |
Составить программу для расчета суммы n первых членов заданной арифметической прогрессии - Pascal - Ответ 889612317.03.2016, 18:40. Показов 5609. Ответов 3
Метки (Все метки)
Ответ 
Сообщение от dyhssys
Вернуться к обсуждению: Составить программу для расчета суммы n первых членов заданной арифметической прогрессии Pascal
0
|
|
| 17.03.2016, 18:40 | |
|
Готовые ответы и решения:
3
Составьте программу вычисления суммы 150 первых членов арифметической прогрессии, если a1 = –200; d = 0,2 |
| 17.03.2016, 18:40 | |
| 17.03.2016, 18:40 | |
|
Помогаю со студенческими работами здесь
0
Написать программу, заносящую в файл 10 первых членов арифметической прогрессии
|