tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Имеется некоторая последовательность
Имеется некоторая последовательность символов. образовать новую последовательность, включив в нее символы исходной, кроме запятых. (использовать склейку «+»)(не использовать pos, delete, copy…)
hide2
2 01.06.2019 20:10
10
Ответы
кюд2
02.07.2020 20:45
Var n, s:string;
i:byte;
begin
read(s);
n:='';
for i:=1 to length(s) do
if s[i]<>',' then n:=n+s[i];
write(n);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
Grundyy
15.09.2020 01:37
На екрані відображається малюнок розміром 10х7 см. Один квадратний сантиметр екрану містить 16х16 пікселів, а глибина кольору – 24 біти....
JackLiff
18.06.2019 21:50
1. в электронной таблице значение формулы =сумм(а1: а4) равно 13, а значение формулы =срзнач(а1: а5) равно 3. чему равно значение формулы =сумм(а1: а5) 2. в электронной таблице...
kirillmrX
18.06.2019 21:50
Запиши современные устройства, которые используются для указанных информационных процессов: хранения сообщения - передача сообщений - обработка сообщений - с этим вопросом....
janibek01
17.05.2020 21:04
3) Петя записал IP-адрес школьного сервера на листке бумаги и положил его в карман куртки. Петина мама случайно постирала куртку вместе с запиской. После стирки Петя обнаружил...
sodzirovna
17.05.2020 21:04
Программисты и те кто хорошо знает информатику Даю 50 б Определить значение переменной f после выполнения фрагмента алгоритма: i:=20; f:=1; while (i 15) { i:=i - 2; f := f...
AAMB
17.05.2020 21:04
Що буде результатом виконання даної програми?...
lokys01twin
17.05.2020 21:03
Що буде результатом виконаної роботи?...
DashaLOVE04
17.05.2020 21:03
Що буде результатом виконання даної програми?...
ElenaComarova
09.09.2019 02:50
Перевести в десятичный эквивалент число 1001100...
nataliamakarov3
23.05.2019 22:40
Кроссворд на тему клавиши f, shift, ! 1, end, клавиша вниз. тока из этого просто скажите как они называются....
Популярные вопросы
Соч География2 четверть 8 класс...
3
Трагедия взаимоотношений главных героев в романе Бедные люди...
2
В шахматном турнире участвуют 18 человек, которые по жребию разбиваются...
1
Высота ромба - 1.2 Одна из диагоналей - 1.5 Найти периметр...
1
В современной художественной литературе часто используют различные научные...
2
Талапбек Сұлтанбеков «Көшпелі алтын» ғылыми фантастикалық әңгімесі не туралы?...
3
Найти значение производной от функции f(x) = tg(x^2)+sin(tgx) в точке с...
3
Построить каденционный оборот : S | K64 - D | T в тональности си бемоль...
3
Билет No 17 1. Соли, их состав и названия,Взаимодействие с металлами,кислотами,...
1
Жауабын тауып беріңіздерші ...
2
i:byte;
begin
read(s);
n:='';
for i:=1 to length(s) do
if s[i]<>',' then n:=n+s[i];
write(n);
end.