tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Напишите программу в
Напишите программу в паскале, которая выводит на экран только нечётные символы (символы под номерами 1, 3, 5, из текста пользователя.
katrin05069
1 04.06.2019 00:30
2
Ответы
Leraekb2012
01.10.2020 19:00
Var s,null:string;
i:integer;
begin
readln(s);
for i:= 1 to length(s) do
if i mod 2 = 1 then
null:=null+s[i];
writeln(null);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
Alexa1888
23.07.2019 01:40
Пож в с++ напишите программу, которая выполняет реверс массива: меняет местами первый и последний элементы, второй и предпоследний и т.д. входные данные первая строка содержит...
jontfols999
21.05.2020 13:33
Первое задание: взять любую пословицу придумать и нарисовать к ней блок систему...
Аллан123
21.05.2020 13:34
Құжатты баспаға жібергенде бұл хабарламаның пайда болуы...
rassiasau
21.05.2020 13:34
Https://photos.app.goo.gl/UrxbMe7BAHqPVUF38 народ сильно надо скриншот скиньте во жизні і смерті...
ВероникаЛицей124
22.05.2020 13:30
с информатикой ради бога господа...
Mousediana
22.05.2020 12:35
Вы думаете 16 см члена это приговор?...
artemalashev
22.05.2020 12:35
Написать программу в паскале и составить таблицу с результатами по блок схеме...
arina556
21.05.2020 12:32
Розгадай слова в яких переплутались литери та знайди серед них зайве. васил якулоб напельси супакта корсиба дарнамин...
катя5087
21.05.2020 12:32
Определите значение переменной после выполнения следующего фрагмента программы: S := 0; i := 1; while i 20 do begin S := S + i; i := i + 4; end;...
HelpMePleaseaaaaa
22.05.2020 12:35
Статья, набранная на компьютере, содержит 8 страниц, на каждой странице 40 строк, в каждой строке 64 символа. Определите информационный объем статьи к килобайтах в одной из кодировок...
Популярные вопросы
Переведите на английский следующие названия стран и территорий: Подмосковье,...
3
Прочитайте отрывок из рассказа «Рождество» В. В. Набокова (гл. 4) Составьте...
1
контрольльний твір на тему Шпага Славка Бермути на одну із тем проблеми дорішлішаня...
1
где здесь ошибка. a = int(input( Введіть ваш вік )) if 0 =a 6: print( Ваша вікова...
1
На вході маємо 2 числа програма запитує у користувача. Чому дорiвнюэ сума цих...
2
напишите как они произносятся !NaHCO3,AgNO3,Mg(OH)Cl,Na2HPO4,KHS,BaSO4,Al(OH)Cl2,K3PO4....
3
Напишите эссе рассуждение на тему Во всём виноваты мы!? ...
3
Значення гормонів в організмі людини таблиця...
2
Сор русская литиратура 5 класс 4 четверть онлайн мектеп...
2
Тема: Держава Феодорор. Кримське ханство. Практичне заняття. 1. Дайте відповіді...
3
i:integer;
begin
readln(s);
for i:= 1 to length(s) do
if i mod 2 = 1 then
null:=null+s[i];
writeln(null);
end.