|
|
| Другие темы раздела | |
|
Pascal ABC Нарисовать рисунок
https://www.cyberforum.ru/ pascalabc/ thread1828929.html Помогите нарисовать рисунок.Самая проблема нарисовать 2 круг со штриховкой |
Pascal ABC Добавить после каждой буквы "о" букву "а" в скобках - "(а)" Дан текст(массив строк, любой не большой текст). Составить программу, которая будет добавлять после каждой буквы "о" букву "а" в скобках - "(а)". |
|
Pascal ABC Зашифровать строку, изменив код каждого символа на число N
https://www.cyberforum.ru/ pascalabc/ thread1828861.html Дана строка(Любое предложение). Зашифровать её, изменив код каждого символа на число N |
Pascal ABC Найти среднее геометрическое четных элементов массива, имеющих нечетный индекс. Найти среднее геометрическое четных элементов массива С(12), имеющих нечетный индекс. Program Lr4; var a:array of integer; Sg,S:real; x,k:integer; https://www.cyberforum.ru/ pascalabc/ thread1828834.html |
|
Pascal ABC Найти наибольшую подпоследовательность в последовательности Найти наибольшую подпоследовательность в последовательности состоящую из чётного числа символов. |
Pascal ABC Можно ли набрать данную сумму существующими монетами
https://www.cyberforum.ru/ pascalabc/ thread1828513.html Существуют монеты номиналами не меньше 3 но не больше 7. Затем даётся сумма N которую нужно набрать. Можно ли набрать данную сумму существующими монетами?? Найти наименьший способ набора. |
|
Pascal ABC Найти минимальную сумму за подъем пианино
https://www.cyberforum.ru/ pascalabc/ thread1828509.html Мальчик Вася живёт в n-большом этажном доме. Васе привезли пианино. Он живёт на L этаже. В доме работает два лифта. первый лифт останавливается на этажах кратные k, второй лифт останавливается на этажах кратные m. Перенос из лифта в лифт стоит 100 р. Подъём пианино на этаж стоит 500 р. Спуск на 1 этаж 200 р. Найти минимальную сумму которую заплатит мальчик Вася. |
Определить какой максимальной ценности приз может получить мальчик Pascal ABC Мальчик Коля участвует в лотерее, в которой 500 призов L которые делятся на L-1 участников. Мальчик расположил призы в массив, обозначив ценность каждого приза как p и t, некоторые призы получили одинаковую ценность. В процессе ведущий удаляет один из призов. Определить: какой максимальной ценности приз, может получить мальчик. |
| Pascal ABC Количество слов начинающихся с буквы "к". Дан текст (массив строк) в котором слова разделены одним пробелом. Составить программу, которая считает в каждой строке количество слов начинающихся с буквы "к". https://www.cyberforum.ru/ pascalabc/ thread1828464.html | Pascal ABC Положительные простые цифры Вводятся произвольные целые числа.Вывести в возрастающем порядке те положительные простые из них цифры которых целеком состоят из простых цифр. Паскаль. https://www.cyberforum.ru/ pascalabc/ thread1828456.html |
|
Замена строчки Pascal ABC Как можно заменить строчку if (k mod 2 = 1) then для убирания 2х if? uses crt; var a,l:real; m,k:integer; begin writeln('a'); readln(a); k:=1; l:=0; while k<=a do begin |
Pascal ABC Дана строка. Определить, сколько в ней слов начинающихся и заканчивающихся на букву k?
https://www.cyberforum.ru/ pascalabc/ thread1828419.html Дана строка. Определить, сколько в ней слов начинающихся и заканчивающихся на букву k? var sum,k,m,n,i:integer; s:string; begin sum:=0; read(s); k:=length(s); |
|
Почетный модератор
64288 / 47587 / 32739
Регистрация: 18.05.2008
Сообщений: 115,182
|
||||||
| 18.10.2016, 16:52 | 0 | |||||
Для каждого числа найти сумму цифр - Pascal ABC - Ответ 966015218.10.2016, 16:52. Показов 3540. Ответов 1
Метки (Все метки)
Ответ
Вернуться к обсуждению: Для каждого числа найти сумму цифр Pascal ABC
1
|
||||||
|
|
| 18.10.2016, 16:52 | |
|
Готовые ответы и решения:
1
Для каждого введённого числа вычислить сумму его цифр Найти количество и сумму цифр, сумму первой и последней цифр заданного числа z
|
| 18.10.2016, 16:52 | |
|
Помогаю со студенческими работами здесь
0
|