Присоединяйтесь к нашему инвестиционному форуму, на котором уже 647,234 пользователей. Чтобы получить доступ ко многим закрытым разделам и начать общение - зарегистрируйтесь прямо сейчас.
Вернуться Форум о заработке и инвестициях > Разное > Самое разное
Перезагрузить страницу

Помогите с "С" и Паскалем

?
Регистрация
Если Вы не знаете куда поместить тему, пишите ее сюда. Этот раздел доступен только зарегистрированным пользователям! Зарегистрироваться можно здесь
 Первый пост Опции темы
Старый 14.12.2010, 23:35
#1
Заблокированный
 
Имя: Илья
Пол: Мужской
Возраст: 31
Инвестирую в: HYIP
Регистрация: 08.01.2010
Сообщений: 180
Благодарностей: 52
Помогите с "С" и Паскалем
В общем моему брату нужна помощь с этими языками программирования: С (не С++ а именно С) и Паскаль (). Ну так как с паскалём я не дружу, то выкладываю задачки сюда, с С-шкой я ему сам попробую помочь, если не получится, то и эти задания выложу сюда. Надеемся на вашу отзывчивость и безвозмездность . Помогите сделать хоть какие-то задания
В паскале:
1. Дана последовательность из 1-30 слов, каждое слово состоит из 1-5 символов; между соседними слова - запятая (пробелов нету вообще), за последним словом - точка.
Вывести на экран слова, длина которых максимальная.

2. Два естественных (натуральных) числа называют "дружными", если каждый из них равняется сумме всех делителей другого, за исключением его самого (такие, например, числа 220 и 284). Вывести на экран все пары "дружных" чисел, которые не превышают заданного натурального числа.

ну пока всё, есть ещё задачка с файлами и множествами, но с ними я и сам попробую помочь брату, если не получится, придется и их сюда выкладывать.
__________________
Реклама: FoxMixer — надежный, проверенный временем биткоин миксер
DarkMAN969 вне форума
Старый 15.12.2010, 02:09
#2
Любитель
 
Пол: Мужской
Инвестирую в: Свой бизнес
Регистрация: 10.05.2009
Сообщений: 153
Благодарностей: 19
Re: Помогите с "С" и Паскалем
На Паскале и С писал довольно много.
На написание программы одной такой задачи нужно около 2-3 часов.
Цена за одну 50$
Устраивает ?
__________________
Реклама: FoxMixer — надежный, проверенный временем биткоин миксер
zexis вне форума
Старый 15.12.2010, 14:45
#3
Заблокированный
 
Имя: Илья
Пол: Мужской
Возраст: 31
Инвестирую в: HYIP
Регистрация: 08.01.2010
Сообщений: 180
Благодарностей: 52
Автор темы Re: Помогите с "С" и Паскалем
Цитата:
Сообщение от zexis Посмотреть сообщение
Цена за одну 50$
ух как вы оцениваете своё время
да нет уж, лучше я и сам покарячусь ради брата...

добавлено через 3 минуты
и, да, к стати, если вы писали довольно долго на этих языках, то задание первого курса выполнять 2-3 часа - это позорно. имхо...
__________________
Реклама: FoxMixer — надежный, проверенный временем биткоин миксер
Последний раз редактировалось DarkMAN969; 15.12.2010 в 14:49. Причина: Добавлено сообщение
DarkMAN969 вне форума
Старый 18.12.2010, 00:10
#4
Мастер
 
Пол: Мужской
Адрес: Поволжье
Инвестирую в: Свой бизнес
Регистрация: 29.08.2007
Сообщений: 2,301
Благодарностей: 420

награды Ветеран MMGP.RU Волшебный горшочек 
Re: Помогите с "С" и Паскалем
100 лет не писал на паскале. Проверить негде. Вот первое задание - набросал за 5 мин

Цитата:
var
stroka: string[200];
slova: array[1..30] od string[5];
i, kolvo_slov, max_dlina: byte;
s: string[5];
begin
readln(stroka);
kolvo_slov := 0;
max_dlina := 0;
s := '';
for i := 1 to length(stroka) do begin
if (stroka[i] = ',') or (stroka[i] = '.') then begin
kolvo_slov := kolvo_slov + 1;
slova[kolvo_slov] := s;
if length(s) > max_dlina then
max_dlina := length(s);
s := '';
if stroka[i] = '.' then break;
end else
s := s + stroka[i];
end;
for i := 1 to kolvo_slov do
if length(slova[i]) = max_dlina then
writeln(slova[i]);
end.
__________________
Реклама: FoxMixer — надежный, проверенный временем биткоин миксер
Техническая поддержка владельцам вебсайтов
ТВОЙ проект - уникальный маркетинг!!!
Последний раз редактировалось Спанч Боб; 18.12.2010 в 00:31. Причина: Добавлено сообщение
Спанч Боб вне форума
Старый 20.12.2010, 19:02
#5
Заблокированный
 
Имя: Илья
Пол: Мужской
Возраст: 31
Инвестирую в: HYIP
Регистрация: 08.01.2010
Сообщений: 180
Благодарностей: 52
Автор темы Re: Помогите с "С" и Паскалем
Спанч Боб, спасибо большое.
Правда, я эту программку уже сделал брату, но она выводит только первое слово с максимальным количеством символов, а все остальные, которые идут после него игнорирует. Сейчас затестирую вашу п-ку
__________________
Реклама: FoxMixer — надежный, проверенный временем биткоин миксер
DarkMAN969 вне форума
Войдите, чтобы оставить комментарий.
Быстрый переход
Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
"Помогите! Нужно купить контекстных уников на сайт!" konan1985 Самое разное 13 16.10.2016 22:24
Статистика жизни HYIP. Анализ проектов со статусами "Silver", "Gold"... pozitiv Псевдоинвестиции: общий форум 20 24.03.2015 12:58
Помогите найти звук "шуршание денег..." dimych1 Курилка 4 10.11.2010 15:52