|
|
|
| Другие темы раздела | |
| Turbo Pascal Нужно посчитать сумму s:=1^i/(i*i*i*i); нужно посчиать сумму s:=1^i/(i*i*i*i); сделал,но выдает не верные результаты,не могу найти что не так? uses crt; var i,n,znak:integer; s:real; BEGIN clrscr; https://www.cyberforum.ru/ turbo-pascal/ thread1113572.html |
Получить новое число b, записанными цифрами числа n, но в обратном порядке Turbo Pascal Дано натуральное число n (n>0). Получить новое число b, записанными цифрами числа n, нов обратном порядке: 1)n,b какое из них больше; 2)Получить сумму n+b; 3)Получить произведение n*b Тут я только не понимаю как получить новое число b. |
|
Turbo Pascal Написать программу, определяющую видимость отрезка
https://www.cyberforum.ru/ turbo-pascal/ thread1113549.html Написать программу, определяющую видимость отрезка, и при заданном окне отсечения, выводит на экран видимые отрезки зеленым цветом, невидимые - красным, подозрительные - желтым. Как это сделать? program Gr2d; uses graph,crt; type coords=record x1,y1,x2,y2,cod1,cod2,vis,f:integer; end; |
Turbo Pascal Опишите, используя структуру записи, данные о студентах (фамилия, улица, дом, квартира) Помогите составить программу: Опишите, используя структуру записи, данные о студентах (фамилия, улица, дом, квартира). Составьте программу, определяющую сколько студентов живет на улице Самарской , списки студентов, живущих в доме 25. https://www.cyberforum.ru/ turbo-pascal/ thread1113548.html |
|
Turbo Pascal Написать программу, которая читает с клавиатуры произвольную строку символов, преобразует ее и выводит результат на дисплей в виде строки - Написать программу, которая читает с клавиатуры произвольную строку символов, преобразует ее и выводит результат на дисплей в виде строки. - Длина строки заранее не вводится, а определяется после окончания ввода с клавиатуры. - В строке группы символов разделяются одним или несколькими пробелами. Пробелы могут находиться в начале и в конце строки. Группа символов - последовательность букв,... |
Turbo Pascal Найти среднее арифметическое чисел, оба индекса которых четные
https://www.cyberforum.ru/ turbo-pascal/ thread1113377.html Заполнить матрицу m*n с клавиатуры. Найти среднее арифметическое чисел, оба индекса которых четные |
|
Turbo Pascal Найти произведение элементов массива
https://www.cyberforum.ru/ turbo-pascal/ thread1113369.html дана квадратная матрица с размернстью m*n,заполненная случайными числами в диапазоне . найти произведение элементов массива. |
В двухмерном массиве каждый отрицательный элемент возвести в куб Turbo Pascal 1. Ввести двухмерный массив поэлементно с помощью клавиатуры или получить его, используя генератор случайных чисел. Двухмерный массив может быть целочисленного или вещественного типа. Количество элементов в двухмерном массиве должна быть не менее десяти. 2. Вывести на экран монитора исходный двухмерный массив в виде таблицы чисел. 3. Выполнить необходимые преобразования над исходным... |
|
Turbo Pascal Создать иерархию объектных типов (человек, студент, преподаватель) с методами init, show
https://www.cyberforum.ru/ turbo-pascal/ thread1113321.html Написать программу на языке Паскаль,которая,используя методику ООП,создает иерархию объектных типов(человек,студент,преподаватель) с методами init,show и полями "Фамилия" "Имя" "Стаж" "Номер группы".Протестировать методы и вывести структуру объектный типов в модуль angel.tpu.Используя модуль,написать программу,которая создает массив из 5 студентов и выводит на экран сначала тех студентов,у... |
Turbo Pascal Подсчитайте число и сумму положительных элементов заданного массива
https://www.cyberforum.ru/ turbo-pascal/ thread1113211.html Подсчитайте число и сумму положительных элементов заданного массива A(N). |
|
Turbo Pascal Сортировка включением Задан массив AX (N). Добавить массив С(К). Выполнить сортировку включением. В полученном векторе подсчитайте число и сумму положительных, число и произведение отрицательных элементов! |
Turbo Pascal В массиве A (N) определите количество элементов, которые меньше заданного значения М Условие: в массиве A(N) определите количество элементов, которые меньше заданного значения М. Мой код: uses crt; const n=10; var a:array of integer; i,k,m:integer; begin clrscr; randomize; for i:=1 to n do begin https://www.cyberforum.ru/ turbo-pascal/ thread1113186.html |
|
0 / 0 / 1
Регистрация: 21.02.2014
Сообщений: 65
|
|
| 16.03.2014, 13:14 [ТС] | 0 |
Дано натуральное число n. Найти количество нечётных цифр числа - Turbo Pascal - Ответ 590652716.03.2014, 13:14. Показов 9189. Ответов 5
Метки (Все метки)
Ответ
Kodzaev, спасибо огромное!!
Вернуться к обсуждению: Дано натуральное число n. Найти количество нечётных цифр числа Turbo Pascal
0
|
|
| 16.03.2014, 13:14 | |
|
Готовые ответы и решения:
5
Дано натуральное число: Найти количество четных цифр числа; Дано натуральное число. Найти количество четных цифр числа
|
| 16.03.2014, 13:14 | |
| 16.03.2014, 13:14 | |
|
Помогаю со студенческими работами здесь
0
Дано натуральное число. Найти сумму цифр этого числа
|