Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
arina050406
15.11.2020 19:50 •
Информатика
1. дан символ. написать программу, выводящую его код. 2. дан код символа. написать программу, выводящую сам символ. 3. написать программу для вывода на экран всех маленьких латинских букв.
Показать ответ
Ответ:
slivinskaja83
10.07.2020 16:53
2)
var
b:integer;
begin
writeln('vvedite kod simvola');
readln(b);
writeln('Simvol: ',chr(b));
readln;
end.
1)var
a:char;
begin
writeln('vvedite simvol');
readln(a);
writeln('kod simvola: ',ord(a));
readln;
end.
3)
var
ch: char;
begin
for ch := 'a' to 'z' do
write (ch,' ');
readln;
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
миёк2
08.06.2023 06:41
Племена каюмба и гаюмба обменялись сообщениями. у племени каюмба мощность алфавита - 8, а у племени гаюмба - 16. у обоих в сообщении было по 25 знаков. у какого племени сообщение...
SlivkO0O154
09.08.2021 05:57
Порівняй вагу хлопчика богдана та дівчинки наталки. користувач має ввести два числа, що відпові вазі хлопчика ті дівчинки, а програма вивести ім я та вагу важчоі дитини на...
Марош3
06.07.2020 22:08
Граф построить и число которое получится...
ЕлизаветаШкола
23.05.2022 22:39
с тестом (Python)1.Напишите программу, которая по заданным двум числам a и b, выводит на экран результат целочисленного деления и остаток, в заданном формате (смотри примеры)...
mila525784
07.06.2022 23:57
Архивация файлов WinRar 1. Запустите WinRar (Пуск Все программы WinRar). 2. В появившемся диалоговом окне выберите папку, в которой будет создан архив: Рабочий стол\Archives\Pictures....
Petack
13.12.2021 17:35
Отвечаем на вопросы 1.Что такое кегельринг2.Опиши условия соревнований по кегельрингу.3.Какие предметы можно использовать в качествекеглей?4. Куда помещается робот на ринге?...
123456782121
07.11.2022 00:00
Дан целочисленный а[1..10], заполненный датчиком случайных чисел найти максимальный элемент массива....
алана24
26.10.2020 15:45
Какой политический вопрос в жизни германского общества 19 века...
nadia291
26.10.2020 15:45
Может ли увеличение численности населения не приводить к обострению экологических проблем? свой ответ поясните....
Sopfia3333333333333
17.09.2022 04:42
Слава хотел купить 20 коныет,но ему не хватило 3 рубля.тогда слава купил 15 конфет,и у него осталось 7 рубля.сколько стоит одна конфета....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
var
b:integer;
begin
writeln('vvedite kod simvola');
readln(b);
writeln('Simvol: ',chr(b));
readln;
end.
1)var
a:char;
begin
writeln('vvedite simvol');
readln(a);
writeln('kod simvola: ',ord(a));
readln;
end.
3)
var
ch: char;
begin
for ch := 'a' to 'z' do
write (ch,' ');
readln;
end.