Составьте программку,по которой вводится случайное слово.Избрать число повторов.Вывести

Составьте программку,по которой вводится произвольное слово.Избрать число повторов.Вывести число на экран лесенкой(Со сдвигом вправо).Без использования вложенного цикла.

Задать свой вопрос
Alina Polishhenko
Что-то я не разумею. Для чего вводить слово, если выводить нужно число? И что означает вывести число лесенкой? По одной цифре в строке? Очень корявая формулировка задачки.
Вужевская Регина
Извиняюсь , необходимо вывести не число , а слово на экран
1 ответ
1)
var s:string; i:integer;
begin
write('Слово: ');
readln(s);
for i:=1 to length(s) do
 writeln(' ':i,s[i]);
end.

Пример:
Слово: лесенка
 л
  е
   с
    е
     н
      к
       а

2)
var s:string; n,i:integer;
begin
write('Слово: ');
readln(s);
write('n = ');
readln(n);
for i:=0 to n-1 do
 writeln('':i*length(s),s);
end.

Пример:
Слово: лесенка
n = 4
лесенка
       лесенка
              лесенка
                     лесенка
Тропачевский Семён
Спасибо огромное
Стефания Маршания
Пожалуйста.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт