Программа которая умножает каждую букву в предложении на 3
кира6371929648
1
21.01.2021 20:44
2
Другие вопросы по теме Информатика
саша4275
26.10.2020 10:41
tolokvlad
26.10.2020 10:42
vinerplay6
30.11.2021 22:04
макс17281
13.06.2019 03:10
Nastya251551
07.10.2019 14:30
iIИльяIi
07.10.2019 14:30
Lisa5511
07.10.2019 14:30
Гульшат11111111
03.12.2020 07:36
Mesia14
03.12.2020 07:50
Популярные вопросы
- У чому перевага та недоліки гомойотермних організмів у порівнянні з пойкілотермними...
3 - 1. Почему в разных местах Земли плотность населения неодинакова?2. Как...
2 - Один із суміжних кутів на 11 разів менший від другого. знайдіть ці кути...
3 - Прямоугольный газон обнесен изгородью, длинна которого 50м. Площадь газона...
2 - 25(балов)Два тела из стали и алюминия равной массы получили одинаковое...
1 - На прямой точка А лежит между точками F и B. Найдите длину отрезка АВ,...
1 - Чувство болтая к окружающим повесть прозрение нужно оту мне два виде...
1 - Как называется расстояние от перигелия до центра эллипса?...
3 - Сколько стоит Ноги короля поп-музыки Майкла Джексона а....
3 - Используя условия задания 77 рассмотрите числа 1) 90; 2) 108; 3) 82....
3
uses crt;
const bk=['A'..'Z','a'..'z','А'..'я','Ё','ё'];
var s:string;
i:byte;
begin
write('Введите слово: ');
read(s);
for i:=length(s) downto 1 do
if s[i] in bk then insert(s[i],s,i);
write(s)
end.