Помогите написать программку на Pascal ) Необходимо, что бы программа выводила
Помогите написать программку на Pascal ) Нужно, что бы программка выводила цикл. Вот такового содержания
12345
2345
345
45
5
Треугольником.
Мулов
Коля
Всм треугольником
Denchik Kejs
Вводи строчку s:= '12345' и далее устраняй 1-ый delete(s,1,1) знак и выводи строчку в цикле по writeln(s)
2 ответа
Илюшка
Var A:integer;
S:String;
begin
Readln(A);
Str(A,S);
While not(S='') do
begin
Writeln(S);
Delete(S,1,1);
end;
end.
S:String;
begin
Readln(A);
Str(A,S);
While not(S='') do
begin
Writeln(S);
Delete(S,1,1);
end;
end.
Амина Купервейс
Выводит так как надобно (Если не считать вводимое число)
Аляпушкина
Полина
Читать не чего не надобно
Карпилевич
Кристина
Что не так?
Mila
Вот такового содержания123452345345455
Нейшулер
Сашок
программка выводит правильно, т.к. ввод за вывод не считают
Альбина Шелихова
если не желаешь тогда так:var S:String;beginReadln(S);While not(S='') dobeginDelete(S,1,1);Writeln(S);end;end.
Марина Горемыкина
Var
i:longint;
s:string;
begin
s:='12345';
for i:=1 to 5 do
begin
writeln(S);
delete(S,1,1);
end;
end.
i:longint;
s:string;
begin
s:='12345';
for i:=1 to 5 do
begin
writeln(S);
delete(S,1,1);
end;
end.
Васельков
Вадим
А зачем тратить излишние байты?
Vanek
А что поменяется если я поставлю bytу?
Владислав Нагаров
byte*
Настя
поставь 1,,5 и все
Алексей Картунькин
Всм ?
Акоева
Ангелина
а если число больше 1000000, тогда что будешь делать?
Илья Истлаев
какое число больше 10000000 ты вобще о чем
Данил Квасницкий
Строчка теснее задана в условии задачки, не так ли?
Борис Вольпс
Вот конкретно ЗАДАНА
Вячеслав Сметанич
Там мудрить нечего не надобно с 10000000 числами
, оставишь ответ?
Похожие вопросы
-
Вопросы ответы
Новое
NEW
Статьи
Информатика
Статьи
Последние вопросы
на одной грядке коротышки посадили 3 ряда морковок по 8 штук
Разные вопросы.
эссе на тему какое образование дается в каждой семье
Қазақ тiлi.
Put the verb in brackets into the Present Indefinite.
1The Volga ,
Английский язык.
Сколько стоит коктейль молочный? Точную цену надо?
Математика.
Составить рассказ Из чего складывался культ монарха помазанника Божьего?
История.
задание экономиоти
Рассмотри ситуацию: человек живёт на Крайнем Се-вере. С помощью каких
Экономика.
Человек живет на Крайнем Севере. С помощью каких благ удовлетворяются потребности
Экономика.
там лежат три яйца.у дома рос клен.Это гнездо сойки.на клёне гнездо
Русский язык.
Тыныштық күйіндегі карусель 35 с-та 3,0 рад/с бұрыштық жылдамдықпен үдей қозғалады.
Разные вопросы.
Сочинение на тему "Русский язык не сможет умереть!"
Математика.
Облако тегов