Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Паскаль, Turbo Pascal, PascalABC.NET
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 17.04.2016, 11:22   #1
Анна997
Пользователь
 
Регистрация: 15.04.2016
Сообщений: 26
По умолчанию Задано слово из 11 букв. Поставить эти буквы на место средней строки

Задано слово из 11 букв. Поставить эти буквы на место средней строки и среднего столбца A(11,11) , первоначально заполненной пробелами
Анна997 вне форума Ответить с цитированием
Старый 17.04.2016, 11:26   #2
Aleksandr H.
2 the Nation Glory
Старожил
 
Аватар для Aleksandr H.
 
Регистрация: 27.05.2014
Сообщений: 3,289
По умолчанию

Код:
for i:=1 to 11 do
begin
a[i,6]:=s[i];
a[6,i]:=s[i];
end;
Кто умер, но не забыт, тот бессмертен.
Лао-Цзы.
Aleksandr H. вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Определить, присутствует ли в начале файла слово ‘Program’. Слово не зависит от регистра букв. Nikitoska Паскаль, Turbo Pascal, PascalABC.NET 1 12.05.2014 19:41
Машина Тьюринга: Определите, имеются ли в слове Х две одинаковые буквы, идущие подряд, если слово состоит из букв "C" и "D" Елешечка Помощь студентам 8 06.04.2014 17:19
Задача на обработку строки: найти самое короткое слово и проверить в нём наличие заданного сочетания букв Черныш Иван Помощь студентам 5 05.06.2011 17:12
Строки, как найти слово с наименьшим количеством букв(Delphi) Dima-91 Помощь студентам 9 30.09.2010 17:37
Поставить CreateThread в нужное место Sam Gold C/C++ Сетевое программирование 4 20.05.2010 23:46