Дано слово . добавить к нему вначале и конце столько звездочек , сколько букв в этом слове .

Ответы

axinoffdaniil 12.06.2020 11:22

var i:integer;
var slovo:string;
begin
write('Vvedite slovo: ');
readln(slovo);
for i:=1 to length(slovo) do
slovo:='*'+slovo+'*';
writeln(slovo);
readln;
end.

ПОКАЗАТЬ ОТВЕТЫ

Другие вопросы по теме Информатика

mneo98 04.02.2021 18:24

Главная, Вставка, Разметка страницы, Формулы, Данные, Рецензирование, Вид Скажите во всех этих функций каждого БЫСТРЕЕ...

никита3497 04.02.2021 18:24

1. Дополните предложения, используя слова из подсказки. Люди издавна интересуются ... . Доказательства этого сохранились на калу,... посуде, бумаге и на шкурах ... . До нас дошли...

NASTUHA6 26.08.2019 18:50

Это на ! создать подпрограмму,которая вычисляет третью степень числа.с этой подпрограммы найти три степени пяти чисел...

ILoveChemistry2 26.08.2019 18:30

Втекстовом редакторе набран текст: «найдут тебя опять за дымкою туманой». для исправления ошибки в слове ‘туманой’ можно использовать команду «найти и заменить»: найти «ано», заменить...

олегБро666 26.08.2019 18:30

Задан массив а(15), заполненный датчиком случайных чисел из интервала [-20,20]. найти и вывести на печать минимальный элемент...

Filip1is 04.10.2019 00:30

Скажите это выбери верные ответы. 1. c: \учёба\analiz.doc двухуровневая система многоуровневая файловая система нет верного ответа одноуровневая файловая система...

luchik1608 04.10.2019 00:30

Что делать если в компьютере в диспетчере исчезла видеоадаптер amd...

Nikol56 04.10.2019 00:30

Индивидуальные номера страховых медицинских свидетельств жителей в некоторой стране содержат только цифры 1, 3, 5, 7 и содержат одинаковое количество цифр, а именно 3 цифры. известно,...

sonicbum 04.10.2019 00:40

Составить блок схему и программу,которая считывает 10 чисел вещественных у пользователя и определяет число положительных чисел и число отрицательных чисел...

Витаминка111118 04.10.2019 00:40

Какое значение примет переменная s после выполнения следующего фрагмента программы? var s, i : integer; a: array [1..5] of integer; for i: =1 to 5 do a[i]: =2; s: =0; for i: =2...

Дано слово . добавить к нему вначале и конце столько звездочек , сколько букв в этом слове .

Популярные вопросы