Помогите с задачей

[KREGI]

Здравствуйте, подскажите как осуществить алгоритм для программы:
Мы набираем, например слово КАРАНДАШ, а должны получить КАбуРАбаНДбуАШба (то есть чередование бу и ба)

[Sazary]

Идем по строке посимвольно и копируем в другую строку.
Если номер текущего символа (от 1) кратен двум, то добавляем в новую строку "бу" или "ба", в зависимости от некоторой переменной (раз только 2 варианта, то можно взять булеву). Затем изменяем эту переменную.

[KREGI]

Sazary, а можешь написать код? и что ты имеешь ввиду под "булеву"?

[Sazary]

Сообщение от KREGI

а можешь написать код? и что ты имеешь ввиду под "булеву"?

Ну код вы уж сами напишите. Что сложного-то?
Булева - логическая (boolean)

[KREGI]

а как сдесь использовать boolean (это по моему как диапазон), и что то я сомневаюсь как идти по символьно по строке, надо рассматривать строку как string...?

[Sazary]

а как сдесь использовать boolean (это по моему как диапазон)

boolean - логический тип. Может принимать два значения - true или false.

и что то я сомневаюсь как идти по символьно по строке, надо рассматривать строку как string...?

Строка - это массив символов. Естественно, как string, А как еще?

for i:=1 to length(str) do
 str[i] - i-й символ строки

[KREGI]

а как здесь булен использовать, я с ним не работал.

[Sazary]

Сообщение от KREGI

а как здесь булен использовать, я с ним не работал.

Тогда используйте любой другой тип. Это не принципиально.
Например, возьмите простой integer или byte.

[KREGI]

а вообще, для общего развития, еще пригодится.

[Sazary]

Сообщение от KREGI

а вообще, для общего развития, еще пригодится.

Конечно пригодится. Но об этом вы можете почитать в любом учебнике в главе "типы данных".

Это логический тип, который принимает одно из двух значений - true или false. Пример:

var b : boolean;
begin
b := (5>1);
if b then writeln('5>1');