|
|
| Другие темы раздела | |
| Pascal числа Армстронга (Pascal) Натуральное число, в записи которого п цифр, называется числом Армстронга, если сумма его цифр, возведенная в степень п, равна самому числу. Найти все числа Армстронга от 1 до k. Программа нужна на языке Pascal,помогите пожалуйста. https://www.cyberforum.ru/ pascal/ thread672588.html |
Pascal На плоскости даны две окружности. Ппроверить, пересекаются ли они Помогите! Проблема с задачей. Две окружности На плоскости даны две окружности. Требуется проверить, пересекаются ли они. Вот условие http://********/index.asp?main=task&id_task=26 . Вот мое решение:var fi, fo: text; var x1, x2, y1, y2, r1, r2: longint; var distance: real; begin assign(fi, 'input.txt'); reset(fi); assign(fo, 'output.txt'); rewrite(fo); readln(fi, x1, y1, r1); |
|
Pascal сдвиг в одномерном массиве
https://www.cyberforum.ru/ pascal/ thread672539.html Дан массив целых чисел Х. . X, рассматриваемый как соединение двух его отрезков: начала X. . X длины m и конца X. . X длины n. Не используя дополнительных массивов, переставить начало и конец массива (число действий желательно m+n). Я не проходил совсем в школе паскаль помогите пожалуйста, читал эту тему но не понял: Код Pascal var a:array of integer; i,r,n,k,j:integer; begin ... |
Pascal Составить программу, вычисляющую сумму двух чисел
https://www.cyberforum.ru/ pascal/ thread672445.html Составить программу вычисляющую сумму двух чисел. Завершение программы при нажатии на цифру 1. Помогите решить плиз через оператор цикла. |
|
Pascal Вычисление элементов массива по формуле, Поиск максимального элемента массива Подскажите, пожалуйста, что не так с решением Дано: Составить программу (с использованием подпрограмм с параметрами), обеспечивающую: 1.Ввод массива А(4,5) 2.Вычисление элементов массива R(4,4) по формуле r(i,j)=(сверху 5, внизу k=1)Ʃ|a(i,k)*a(j,k)| 3.Поиск максимального элемента массива R 4.Вывод результатов в виде: R(1,1)=<> R(1,2)=<> … R(1,4)=<> |
Pascal Функции: Найти расстояние между двумя точками с заданными координатами
https://www.cyberforum.ru/ pascal/ thread672109.html Найти расстояние между двумя точками с заданными координатами (x1, y1) и (x2, y2). как такую же задачу написать только при этом нужно использовать функцию |
|
Pascal Формирование массивов, поиск элементов с заданными свойствами
https://www.cyberforum.ru/ pascal/ thread672043.html Даны сведения о массах 15 вагонов состава - массив A . 1)Определить число вагонов N1 с массой >60 т. ,их суммарная масса, число N2 вагонов с массой <= 60 т. и их суммарный масса. 2)Сформировать соответственно массивы B1 и B2. 3) Определить самый тяжелый вагон в массиве B1, его порядковый номер. |
Даны координаты вершин треугольника, определить его вид Pascal А если Даны координаты вершин треугольника, определить его вид (прямоугольный, остроугольный, тупоугольный). Вывести значения его сторон по неубыванию? Подскажите пожалуст |
| Pascal Вычислить сумму ряда S=sinX+sin2X/4+sin3X/9+...+sin9X/81 ребята помогитеD S= sinX + sin2X/4 + sin3X/9+...+ sin9X/81 нужно написать программу тремя операторами заранее спасибо... https://www.cyberforum.ru/ pascal/ thread672000.html |
Pascal Псевдографика: нарисовать 2 фигуры близнецов
https://www.cyberforum.ru/ pascal/ thread671957.html Люди, помогите пожалуйста решить задачу. с помощью знаков «*» согласно варианту нарисовать 2 фигуры близнецов в соответствии с вариантом. Необходимо написать собственные процедуры, функции для задания примитивов. Фигуры должны быть центрированы и располагаться на расстоянии 10 пикселей друг от друга. Фигура должна быть отмасштабирована по размеру экрана. Заранее спасибо. |
|
Pascal ряд маклорена 1.Вычислите сумму ряда с заданной степенью точности : ∑_(n-0)^∞ (-1)^n ×1/(3n+1) , =0,01 2.Значение функции sin2(x) можно Вычислите с помощью разложения ее в ряд Маклорена 〖sin〗^2 (x)=x^2-x^4/3+〖2x〗^6/45-…+((-1)^(n-1) *2^(2n-1)* x^2n)/(2n)!+⋯ Вычислите sin2(x) с точностью EPS, т.е. вычисление суммы ряда нужно продолжать до тех пор, пока абсолютная величина очередного члена ряда не... |
Pascal Вычислить длину окружности и площадь круга одного и того же заданного радиуса R
https://www.cyberforum.ru/ pascal/ thread671781.html Брату в универе нужно написать задачки по программированию (лабы) на паскале. Помогите кто знает, спасибо. 1. Вычислить длину окружности и площадь круга одного и того же заданного радиуса R. |
|
0 / 0 / 0
Регистрация: 01.12.2013
Сообщений: 5
|
|
| 01.12.2013, 12:19 | 0 |
Вывести все трехзначные числа в которых есть две одинаковые цифры - Pascal - Ответ 541819601.12.2013, 12:19. Показов 6675. Ответов 4
Метки (Все метки)
Ответ
найти все трехзначные числа, у которых две цифры одинаковы через цикл while в Паскале пожалуйстаMawrat,
Вернуться к обсуждению: Вывести все трехзначные числа в которых есть две одинаковые цифры Pascal
0
|
|
| 01.12.2013, 12:19 | |
|
Готовые ответы и решения:
4
Найти все четырёхзначные числа,в которых есть две одинаковые цифры Найдите все четырехзначные числа, в которых есть две одинаковые цифры
|
| 01.12.2013, 12:19 | |
| 01.12.2013, 12:19 | |
|
Помогаю со студенческими работами здесь
0
Вывести на экран все трехзначные числа, сумма первой и третьей цифры которых больше второй цифры. Вывести на экран все трехзначные числа, сумма первой и третьей цифры которых больше второй цифры.
Определить, верно ли, что в десятичной записи целого числа есть две одинаковые цифры |