Страница 1 из 1
1 задача на строки по Pascal
Добавлено: 17 дек 2008, 23:58
vafel'
Решите плиз задачку СРОЧНО НУЖНО; Заранее Спасибо:*)
Написать программу где функция charone(c1,c2:string):string-ищет повторяющиеся в строке с1 подряд символы и удаляет те из них,которые описаны в строке с2.
Буду премного благодарен.
Re: Задача на строки по Pascal
Добавлено: 18 дек 2008, 20:27
demon416
вообщето думать как правило полезней
итак:
vafel'
Код: Выделить всё
program stroki;
function charone(c1,c2:string):string
var
i: integer;
begin
for i:=1 to length(c2) do
while pos(c2[i]+c2[i],c1) do
delete(c1,pos(c2[i]+c2[i],c1));
result:=c1;
end;
begin
writeln(charone('dfsdfaaasdfuusdfsdvee dsfsdfeedeeee tttdsfv rrrrr','uart'));
readln
end.
Re: 1 задача на строки по Pascal
Добавлено: 20 дек 2008, 22:02
vafel'
почему-то не работает эта программа, пишет ошибку №40
Re: 1 задача на строки по Pascal
Добавлено: 21 дек 2008, 11:14
Хыиуду
Странно, а должен писать ошибку №85
Код: Выделить всё
program stroki;
function charone(c1,c2:string):string;
var
i: integer;
begin
for i:=1 to length(c2) do
while pos(c2[i]+c2[i],c1)>0 do
delete(c1,pos(c2[i]+c2[i],c1),1);
charone:=c1;
end;
begin
writeln(charone('dfsdfaaasdfuusdfsdvee dsfsdfeedeeee tttdsfv rrrrr','uart'));
readln
end.
Re: 1 задача на строки по Pascal
Добавлено: 22 дек 2008, 20:29
vafel'
Спасибо тебе большое,ты меня очень выручил
Re: 1 задача на строки по Pascal
Добавлено: 14 янв 2009, 21:49
fareng8
Pascal, строковый тип.
Дано двоичное число, нужно его перевести в шестнадцатеричное.
Re: 1 задача на строки по Pascal
Добавлено: 15 янв 2009, 00:19
Хыиуду
разбиваем на группы по 4 символа, каждую группу переводим в 16ричную цифру, записываем.
Re: 1 задача на строки по Pascal
Добавлено: 06 фев 2009, 13:23
atavin-ta
Разбей строку на подстроки по 4 и переведи по таблице:
0000 - 0
0001 - 1
0010 - 2
0011 - 3
0100 - 4
0101 - 5
0110 - 6
0111 - 7
1000 - 8
1001 - 9
1010 - a
1011 - b
1100 - c
1101 - d
1110 - e
1111 - f
Re: 1 задача на строки по Pascal
Добавлено: 10 фев 2009, 00:58
dr.Jekill
Э,fareng8! Гугл что, отменили?!
Перевод из одной системы счисления в другую, это, что называется, классика жанра.