Регистрация
Войти
Стать экспертом Правила
Информатика

Напишите программу, которая вводит строку и выводит ее, сокращая каждый раз на 1 символ с начала строки до тех пор, пока в строке не останется 1 символ

ОТВЕТЫ
Var st: string;begin  write(строка:  );    readln(st);  repeat    delete(st,1,1);    writeln(st);  until length(st)lt;2;end.
82
Контакты
Реклама на сайте
Спрошу
О проекте
Новым пользователям
Новым экспертам