|
|
Другие темы раздела | |
Turbo Pascal Подсчитать количество букв "B", встречающихся в массиве и определить места их нахождения
https://www.cyberforum.ru/ turbo-pascal/ thread1573903.html Для данных варианта 19 , подсчитать количество слов в строке,считая разделителем слов-пробел.Сформировать массив из слов строки.Вариант-19:Дана произвольная строка символов . Сформировать массив из символов составляющих строку,подсчитать количество букв <<B>> встречающихся в массиве и определить места их нахождения. |
Turbo Pascal Дан двумерный массив. Необходимо заменить в каждой строке все равные симметрично расположенные элементы Дан двумерный массив. Необходимо заменить в каждой строке все равные симметрично расположенные элементы на нули. |
Turbo Pascal Определить число элементов матрицы, кратных A
https://www.cyberforum.ru/ turbo-pascal/ thread1573353.html Определить число элементов матрицы кратных A. Размерность массива (число строк и (или) число столбцов) и значения его элементов ввести с клавиатуры. |
Turbo Pascal Нарисовать блок схему по программе var k,n:integer; c:real; Function fact(n:integer) : real; Begin If n=0 then fact:= 1 Else Fact:= fact(N-1)*N End; begin write('k,n=');readln(k,n); c:=fact(n)/fact(k)/fact(n-k); https://www.cyberforum.ru/ turbo-pascal/ thread1573318.html |
Определить длину каждого слова в строке. Turbo Pascal Дана строка слов.Определить длину каждого слова в строке. |
Turbo Pascal Подсчитать в тексте количество согласных букв Дан произвольный текст из строчных русских букв.Посчитать в нем кол-во согласных букв и выдать их на экран https://www.cyberforum.ru/ turbo-pascal/ thread1573312.html |
Turbo Pascal Написать программу решения поставленной задачи, используя прямой и обратный пересчет Написать программу решения поставленной задачи, используя прямой и обратный пересчет. Вычислить: \sum_{n=3}^{13} \frac{n-1}{{n}^{2}-3n+2} \prod_{n=1}^{11} \frac{3{n}^{2}-2}{2{n}^{3}+3} Program Z6; Uses CRT; Var n:integer; x,y,s,p:real; https://www.cyberforum.ru/ turbo-pascal/ thread1573166.html |
Turbo Pascal Дана матрица А порядка n. Найти номер строки матрицы, в которой больше всего нулевых элементов Дана матрица А порядка n. Найти номер строки матрицы, в которой больше всего нулевых элементов. |
Turbo Pascal Дана последовательность целых чисел a1, a2,.,an. Найти наименьший среди положительных элементов
https://www.cyberforum.ru/ turbo-pascal/ thread1573135.html Дана последовательность целых чисел a1, a2,...,an. Найти наименьший среди положительных элементов. Ребят помогите, заранее спасибо! |
Turbo Pascal Дан двумерный массив. Нужно поменять средние столбцы со вторым и предпоследним
https://www.cyberforum.ru/ turbo-pascal/ thread1573051.html Дан двумерный массив. Нужно поменять средние столбцы со вторым и предпоследним. |
Turbo Pascal Составить ТР-программу решения задания обработки данной символьной информации Удалить часть текста, которая находится между вторым и первым пропуском. текст: не рядись бараном ибо еще волк съест |
Turbo Pascal Перевести код с Delphi
https://www.cyberforum.ru/ turbo-pascal/ thread1572947.html Переведите пожалуйста на паскаль, форму можно вообще убрать unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, Grids; |
0 / 0 / 0
Регистрация: 31.10.2015
Сообщений: 6
|
|
07.11.2015, 21:33 [ТС] | 0 |
Даны целые числа n,k ( n>=k, k>=0). вычислить :n(n-1).(n-k+1)/k1 - Turbo Pascal - Ответ 830742507.11.2015, 21:33. Показов 5816. Ответов 6
Метки (Все метки)
Ответ
Ну это дробь. Там n(n-1)...(n-k+1) деленное на к1.
Вернуться к обсуждению: Даны целые числа n,k ( n>=k, k>=0). вычислить :n(n-1).(n-k+1)/k1 Turbo Pascal
0
|
07.11.2015, 21:33 | |
Готовые ответы и решения:
6
Даны целые числа X,Y,Z. Вычислить MIN (X,Y, X-Y) Даны целые числа A, B, C: вычислить значение выражения x Даны целые положительные числа A и B (A < B). Вывести все целые числа от A до B включительно Даны целые числа a1, a2, .. , an. Вывести на печать только те числа для которых ai >= i |
07.11.2015, 21:33 | |
07.11.2015, 21:33 | |
Помогаю со студенческими работами здесь
0
Даны числа а и b, вывести все целые числа между ними Даны натуральные числа n, р, целые числа A1,.,An. Получить произведение членов последовательности A1, ., An, кратных р Даны целые числа X(n) переписать в новый массив все числа лежащие в диапазоне [-3;7] Даны два числа m и n. вывестивсе целые числа между ними в порядке убывания |