Дан текст.вывести все буквы, которые находятся на нечётных позициях
норочка3
2
09.07.2019 08:40
0
Другие вопросы по теме Информатика
shestukhina1973
19.06.2019 17:50
kseniya1276
19.06.2019 17:50
Brodyga007
17.10.2021 19:18
ochensad
17.10.2021 19:12
Goodok10
23.05.2019 21:32
Sashkoo2003
25.03.2019 03:40
kri2221
25.03.2019 03:40
yanryabinin2006
25.03.2019 03:30
Популярные вопросы
- Как посчитать свое давление на поверхность земли если масса тела 40кг...
1 - Read the dialogue and answer the questions...
1 - Космоботаника старше пилотируемой космонавтики. Ветка традесканции,комнатного...
1 - найдите точку пересечения графиков линейных функций игрек равен минус 0,5...
2 - Определите какое слово называет данные предметы укажите чем оно является...
3 - Памаги с домашкой...5 и 7 >...
3 - В кинотеатре три зала.Первый зал вмещает 2500 зретелей,второй и третий (каждый)...
2 - Қазақстан тарих бжб 7-сынып 2 тоқсан ...
1 - прямі а і b перетинаються в точці o .Сума 2кутів,що утворилася при перетинанні...
2 - 4) Чего ожидали Фриц и Мари в этот вечер?...
2
i:integer;
begin
writeln('Введите строку');
readln(s);
for i:=1 to length(s)
do if i mod 2 =1 then write(s[i]);
end.