результат работы этого
Цитата:
PROGRAM function_delete;
VAR
Words: STRING[79];
Word1: STRING[20];
BEGIN
WriteLn;
Words := 'нАСТЕНЬКА';
WriteLn(Words);
Delete(Words,1,3);
WriteLn(Words);
Delete(Words,3,2);
WriteLn(Words);
END.
|
Результат который нужен сам незнаю ..есть только условие вот оно
Цитата:
напишите процедуру,которая удаляет из списка символ указанный при вызове процедуры (delete).
|
Принес тот вариант сказали не правильно иди переделывай... хотя все работает ....а чего они точно хотят не известно .....сказали лишь что какую-то процедуру еще нужно или эта не верна =(