Добавить перед каждым словом его порядковый номер в предложении. Pascal написать
Добавить перед каждым словом его порядковый номер в предложении. Pascal написать программку помогите кто сумеет
Задать свой вопрос
Тимур Козырь
Пробелы лишние могут быть?
Андрей Малисевич
да
Александра Байкаева
Ехх,печальна ну хорошо,напишу сейчас
1 ответ
Milena Derebezova
Pascal ABC
var
s,news:string;
k:longint;
begin
k:=0;
read(s);
s:=s+' ';
while s lt;gt; '' do
begin
if copy(s,1,pos(' ',s)) = ' ' then
begin
delete(s,1,pos(' ',s));
news:=news+' ';
end
else
begin
inc(k);
news:=news+inttostr(k)+'.'+copy(s,1,pos(' ',s));
delete(s,1,pos(' ',s));
end;
end;
writeln(news);
end.
Тоня Павленина
А ты нечаянно блок схему нарисовать не сможешь?) пожалуйста)
Злата Едомаха
Не,извиняй это не ко мне,это звучит окончательно звучит удивительно но нас в физ-мат лицее никогда не учили рисовать всякие блок схемы и тд,могу практически всякую программку только написать
Мария Аксеныч
Спасибо и за это)
Эвелина Караковская
а ты сможешь ещё одну прогу написать?
Владислав
Подсчитать количество слов в предложении, которые имеют более 2-ух букв а.
, оставишь ответ?
Похожие вопросы
-
Вопросы ответы
Новое
NEW
Статьи
Информатика
Статьи
Последние вопросы
задание экономиоти
Рассмотри ситуацию: человек живёт на Крайнем Се-вере. С помощью каких
Экономика.
Человек живет на Крайнем Севере. С помощью каких благ удовлетворяются потребности
Экономика.
там лежат три яйца.у дома рос клен.Это гнездо сойки.на клёне гнездо
Русский язык.
Тыныштық күйіндегі карусель 35 с-та 3,0 рад/с бұрыштық жылдамдықпен үдей қозғалады.
Разные вопросы.
Сочинение на тему "Русский язык не сможет умереть!"
Математика.
Приветствую!
Меня зовут Станислав, я представляю компанию under.site.
Хотел бы предложить интересное решение
Разные вопросы.
Масса трёх одинаковых пакетов чая 180г чему равна масса
Математика.
Газообразный аммиак объёмом 2.24 л (н.у.) был полностью поглощён 14.68 мл
Химия.
Упражнение 2 Выпишите глаголы и вставьте пропущенные буквы
Русский язык.
Радиус окружности, описанной около равностороннего треугольника, равен 6. Найдите сторону треугольника
Геометрия.
Облако тегов