Форум программистов, компьютерный форум CyberForum.ru
Наши страницы

Перевод от PASCAL C++ - C++

Войти
Регистрация
Восстановить пароль
Другие темы раздела
C++ Проблемы с созданием нового проекта в Visual C++ 2010 Express http://www.cyberforum.ru/cpp-beginners/thread705179.html
Сегодня захотел создать новый проект в VS и он выдал: No items found. Может, кто-нибудь сталкивался с этим? Что делать?
C++ Объединение двух массивов Ребята,срочно. Даны два масссива b и c как их объединить в один третий массив d например? http://www.cyberforum.ru/cpp-beginners/thread705176.html
Визуальное программирование. Считывание теста C++
Создать программу, которая могла бы считывать введённую функцию и потом рассчитать по ней. Как сие реализовать?
Уплотнить матрицу C++
Доброго всем времени суток. Хотелось бы разобраться с одним вопросом. Задание звучит так Дана целочисленная прямоугольная матрица: m = {{ -16, -78, 0, -6, -29, -19, 0, -65, -88, -51}, ...
C++ Использование строк.Использование структур http://www.cyberforum.ru/cpp-beginners/thread705153.html
Задачка: Дана строка,состоящая из групп нулей и едениц. Найти и вывести на экран группы с нечетным количеством символов. И еще одна: В справочной автовокзала хранится расписание движения...
C++ Visual C++ 2012 Ultimate Доброго времени суток. Скачал сегодня Вижуал с++ 2012. Разъясните по хардкору, как в нем работать, а то до этого в билдере работал. Для начала, что не так в этой программе ? подробнее

Показать сообщение отдельно
airesjke
0 / 0 / 0
Регистрация: 30.10.2011
Сообщений: 20

Перевод от PASCAL C++ - C++

22.11.2012, 06:06. Просмотров 238. Ответов 0
Метки (Все метки)

уважаемые программисты C++

Добавлено через 1 минуту
sub:='';
k:=0;
c:=0;
for I := 1 to length(s) do
if (s[i]=' ') and (sub<>'') then begin inc(k); a[k]:=sub;sub:='';end
else if s[i]<>' ' then sub:=sub+s[i];
if sub<>'' then begin inc(k);a[k]:=sub; end;
for i := 1 to k do
if pos('pok',a[i]) then writeln(a[i]);
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
 
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2017, vBulletin Solutions, Inc.
Рейтинг@Mail.ru