|
|
Другие темы раздела | |
Turbo Pascal Написать пограмму использующие тип множества
https://www.cyberforum.ru/ turbo-pascal/ thread281251.html Дана не пустая последовательность слов из строчных русских букв: между соседними словами -запятая, за последним словом- точка. Напечатать в алфавитном порядке все согласные буквы которые не входят ни в одно слово. |
Turbo Pascal строки : В данном предложении выделите первую последнюю букву . Массив не использовать ! помогите пожалуйста массивы не понимаю :( решите задачу . задача на строки : В данном предложении выделите первую последнюю букву . Массив не использовать ! |
Turbo Pascal unit timer
https://www.cyberforum.ru/ turbo-pascal/ thread281213.html У мя турбо паскаль 7, free pascal упёрся на юните и всё тут, выкидыват ошибку. Встаёт на начале модуля "unit" и дальше не идет и выкидыват ошибку Error 113: Error in statement. - Ошибка в операторе не знаю уже много всего проверил !? :( помогите =), что, сделал не верно :wall: может я где-то туплю. program timer; var hour, min, sec, hund: longint; procedure x_timer; begin unit... |
Turbo Pascal создание и откладка программ обработки динамически размещаемых данных Дан список, содержащий целые числа. Сформировать другой список из элементов данного, абсолютные величины которых являются простыми числами. помогите пожалуйста))))))))))))) https://www.cyberforum.ru/ turbo-pascal/ thread281208.html |
Turbo Pascal Вычислить сумму n первых членов ряда с использованием цикла repeat 1.Дан ряд {a}_{k}=\frac{\sqrt{k}}{{k}^{3}+0.8}. Вычислить сумму n первых членов ряда с использованием цикла repeat. 2.Дан одномерный числовой массив. Вычислить сумму произведений всех троек соседних чисел. |
Turbo Pascal текстовые файлы Дано целое число N и текстовый файл с именем Nаmе1, содержащий один абзац текста, выровненный по левому краю. Отформатировать текст так, чтобы его ширина не превышала N позиций, и выровнять текст по правому краю. Пробелы в конце строк удалить. Сохранить отформатированный текст в новом текстовом файле с именем Nаmе2 https://www.cyberforum.ru/ turbo-pascal/ thread281194.html |
Turbo Pascal Представить дату(день,месяц,год)в виде записи. Представить дату(день,месяц,год)в виде записи. Даны 2 даты. Найти а) их года,б) их месяцы, в) поменять местами месяцы, выдать измененные даты. https://www.cyberforum.ru/ turbo-pascal/ thread281186.html |
Составить процедуру разбиения строки на слова Turbo Pascal задание: составить процедуру разбиения исходной строки, состоящей из слов разделенных пробелами, на отдельные слова, которые будут являться массивом.элементами которого будут эти слова. для примера. исходная строка: "я изучаю паскаль" процедура должна выводить массив 3*1 : я изучаю паскаль |
Turbo Pascal Определить значение функции
https://www.cyberforum.ru/ turbo-pascal/ thread281157.html Определить значение функции z=f(x). Операцию возведения в степень реализовать в подпрограмме функции. Записать файл, записать результат в файл и вывести результат на экран. z=\frac{\sqrt{{({x}^{2}+\sqrt{x-y})^{2}}+{x}^{2}+\sqrt{x-y}}}{(y+tg x)sin x+cos x} x=0.253762 y=-1.28645 пожалуйста помогите кто может... |
Turbo Pascal Массив совсем замучил В целочисленном массиве необходимо найти и вывести номера двух элементов, наименее отличающихся друг от друга. Вроде несложно, но неправильно - не могу понять, где ошибка program C2_19; uses crt; const N=5; var a: array of integer; i,j,min1,min2,s:integer; begin clrscr; https://www.cyberforum.ru/ turbo-pascal/ thread281152.html |
Игра в графическом режиме Turbo Pascal Уважаемые форумчане! Суть вопроса такова: пишу курсовую, тема - игра "Костяной покер" (кто играл в "Ведьмак", мб помнит, кто нет - http://cornplay.narod.ru/Dice/rules.html). Кто может подсказать какие-нить идеи для реализации повторного броска? Во вложении - то, что уже сделал. |
Turbo Pascal Иосиф Флавий. Вот значит, в интернете нашел много кодов этой задачи, но ни один не работает нормально. можете помочь с поиском или разработкой понятного и работающего кода? https://www.cyberforum.ru/ turbo-pascal/ thread281140.html |
232 / 181 / 104
Регистрация: 19.03.2010
Сообщений: 949
|
||||||
21.04.2011, 18:37 | 0 | |||||
Получить сумму тех чисел данной последовательности которые кратны 3 - Turbo Pascal - Ответ 157472621.04.2011, 18:37. Показов 1985. Ответов 7
Метки (Все метки)
Сообщение было отмечено Памирыч как решение
Решение
Не успел Вернуться к обсуждению: Получить сумму тех чисел данной последовательности которые кратны 3 Turbo Pascal
1
|
21.04.2011, 18:37 | |
Готовые ответы и решения:
7
Получить сумму тех чисел данной последовательности, которые кратны 7 Получить сумму тех чисел данной последовательности, которые кратны 5 - построить блок-схему Получить сумму тех чисел данной последовательности которые нечетные Получить сумму тех чисел данной последовательности, которые нечетны и отрицательны |
21.04.2011, 18:37 | |
21.04.2011, 18:37 | |
Помогаю со студенческими работами здесь
0
Получить сумму тех чисел данной последовательности, которые нечётны и отрицательны Получить сумму тех чисел данной последовательности, которые нечетны и отрицательны Получить сумму трех членов данной последовательности, которые кратны 5. Получить сумму тех членов данной последовательности,которые нечетные и отрицательные |