Вопрос № 127375: Помогите решить задачу!!!!!
Найти произведение b элементов последовательности нечетных чисел, где начальное число а.
Застрял.........Вопрос № 127421: Здравствуйте!Помогите пожалуйста написать программу, которая создаёт запись студент,с полями : ф.И.О,возраст. Всё записать в файл 1.txt и перезаписать в файл 2.txt .
Заранее благодарен!...Вопрос № 127432: Дан текст на русском языке.Напечатать в алфавитном порядке все согласные буквы, которые не входят в каждое слово.(Решить данную задачу используя данне типа множество.)...Вопрос № 127433: Помогите решить задачу.
Дано слово. Поменять в нем местами символы с номерами N и M.
Я знаю что эта задача легка для вас, но все же помогите. Я пока учусь! ...
Вопрос № 127.375
Помогите решить задачу!!!!!
Найти произведение b элементов последовательности нечетных чисел, где начальное число а.
Застрял......
Отвечает: Пупорев Юрий Борисович
Здравствуйте, Шорин Роман Игоревич!
Решение в приложении, довольно простое и в комментариях не нуждается. Единственно, произведение растет очень быстро и не следует присваивать а и b большие значения, иначе выйдем за пределы типа Longint.
Приложение:
Ответ отправил: Пупорев Юрий Борисович (статус: 6-ой класс)
Ответ отправлен: 15.03.2008, 07:36 Оценка за ответ: 5
Вопрос № 127.421
Здравствуйте!Помогите пожалуйста написать программу, которая создаёт запись студент,с полями : ф.И.О,возраст. Всё записать в файл 1.txt и перезаписать в файл 2.txt .
Заранее благодарен!
Отправлен: 15.03.2008, 12:16
Вопрос задал: Saiks (статус: Посетитель)
Всего ответов: 2 Мини-форум вопроса >>> (сообщений: 0)
Отвечает: Шемет Станіслав Васильович
Здравствуйте, Saiks!
Программа в приложении
Приложение:
--------- Любовь это прекрасно!!!
Ответ отправил: Шемет Станіслав Васильович (статус: 4-ый класс)
Ответ отправлен: 15.03.2008, 12:28 Оценка за ответ: 5
Отвечает: Пупорев Юрий Борисович
Здравствуйте, Saiks!
Записал и переписал, результат в приложении.
Приложение:
Ответ отправил: Пупорев Юрий Борисович (статус: 6-ой класс)
Ответ отправлен: 15.03.2008, 13:26 Оценка за ответ: 5
Вопрос № 127.432
Дан текст на русском языке.Напечатать в алфавитном порядке все согласные буквы, которые не входят в каждое слово.(Решить данную задачу используя данне типа множество.)
Отвечает: Boriss
Здравствуйте, Попов Александр Олегович!
В приложении код, решающий Вашу задачу (на всякий случай и прикрепляю). Прошу помочь в тестировании - я не гонял сильно программу, может, где-то и ошибся (хотя так не думаю).
Если чёй-то не то - напишите в минифоруме - исправим :))
Там же готов ответить на вопросы
Используется:
массив множеств, к который добавляем преобразованные в заглавные буквы
для множеств определена операция "пересечение" - Порядковое значение c содержится в a*b только тогда, когда он содержится в обоих множествах a и b
С помощью это операции находим те буквы, что ВХОДЯТ в каждое слово (накапливаем в множестве chars[1])
А далее просто: перебираем все символы и, если они не входят в chars[1], - выводим
Приложение:
Прикреплённый файл: Загрузить >> Срок хранения файла на сервере RusFAQ.ru составляет 30 суток с момента отправки ответа. --------- Вывод - то место в тексте, где вы устали думать
Ответ отправил: Boriss (статус: Профессор) Россия, Саранск Организация: Мордовский госуниверситет, Саранск Факультет Электронной Техники WWW:Программирование на Паскале ---- Ответ отправлен: 15.03.2008, 15:32
Вопрос № 127.433
Помогите решить задачу.
Дано слово. Поменять в нем местами символы с номерами N и M.
Я знаю что эта задача легка для вас, но все же помогите. Я пока учусь!
Отвечает: Marked One
Здравствуйте, Шорин Роман Игоревич!
Код в приложении, коментарии там же. Будут вопросы-пишите.
Удачи!!!
Приложение:
Ответ отправил: Marked One (статус: 8-ой класс)
Ответ отправлен: 15.03.2008, 13:55 Оценка за ответ: 5
Отвечает: Пупорев Юрий Борисович
Здравствуйте, Шорин Роман Игоревич!
Решение в приложении, комментариев думаю не требует.
Приложение:
Ответ отправил: Пупорев Юрий Борисович (статус: 6-ой класс)
Ответ отправлен: 15.03.2008, 14:06 Оценка за ответ: 5
Отвечает: Евчик Сергей Александрович
Здравствуйте, Шорин Роман Игоревич! Код в приложении! Удачи
Приложение:
Ответ отправил: Евчик Сергей Александрович (статус: 3-ий класс)
Ответ отправлен: 15.03.2008, 14:18 Оценка за ответ: 5 Комментарий оценки: Спасибо!
Отвечает: Шемет Станіслав Васильович
Здравствуйте, Шорин Роман Игоревич!
Var
s:string;
Buf:char;
n,m:byte;
Begin
Write('Enter Slovo : ');
Readln(s);
Write('Enter N and M : ');
REadln(n,m);
if (N>0) and (M>0)and (n<=length(s))and (m <=length(s)) then(*Проверка значений N M не выходят ли они за диапазон допустимых значений для даной длины слова *)
Begin
buf:=s[n];
s[n]:=s[m];
s[m]:=buf;
WRite('New slovo is : ',s);
end;
Readln;
end.
--------- Любовь это прекрасно!!!