Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
Reizon
31.01.2021 20:17 •
Информатика
Составит программу, которая для символа '=' выводит предыдущий и следующий символы. в паскале.
Показать ответ
Ответ:
Роднойязык11
16.09.2020 10:19
USES CRT;
VAR x,y,z:char;
BEGIN
CLRSCR;
x:='='; {приравниваем переменной х значение '='}
y:=Succ('='); {при приравниваем следующее по порядку}
z:=Pred('='); {при приравниваем предыдущее значение}
Writeln(z,' ',x,' ',y);
READLN;END.
0,0
(0 оценок)
Популярные вопросы: Информатика
anonims123456789
14.11.2020 07:05
Генетическая информация у всех живых существ кодируется в молекулах ДНК. Молекула ДНК представляет собой линейную последовательность четырех основных нуклеотидов: А, G, C и Т....
iirunka153
01.08.2020 03:43
Напишите наименьшее целое число X, для которого ИСТИННО высказывание: НЕ (X 7) И (X нечётное)....
MeerDasha487
03.02.2023 14:41
Напишите наименьшее натуральное двузначное число для которого истинно высказывание не первая цифра несчётная и число делится на 3...
БПАНган
22.01.2022 21:45
Напишите программу на языке программирования паскаль создания массива и вывода элементов массива на экран, состоящего из 15 элементов, заполненных случайным образом...
dzhusanastasia
01.05.2022 00:36
Отметьте верное. 1) при форматировании текстового документа происходит … а) обработка, связанная с изменением формы информации, но не изменяющая ее содержания б) обработка, связанная...
filipp000
07.07.2022 10:22
Дана непустая последовательность целых чисел, оканчивающаяся нулем. найти: сумму всех чисел последовательности. входные данные: 12, 4, 8, 0 выходные данные: 24...
perizatvip
07.07.2022 10:22
Рассчитайте время звучание моноаудиофайла, если при 32-битном кодировании и частоте дискретизации 16 кгц его объём равен 700 кбайт....
teddybear1812
16.02.2023 15:16
Используя следующие фрагменты составьте условный оператор: 1)a: =с+1 б)for в)a b г)then д)do е)while...
Виталий0003
11.05.2023 07:02
25 ! почему компьютерную графику используют почти всегда в сжатом виде?...
ЮлияМедведева
16.05.2022 20:28
Створити проект для і знаходження суми двозначних цілих парних програма: lazarus...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
VAR x,y,z:char;
BEGIN
CLRSCR;
x:='='; {приравниваем переменной х значение '='}
y:=Succ('='); {при приравниваем следующее по порядку}
z:=Pred('='); {при приравниваем предыдущее значение}
Writeln(z,' ',x,' ',y);
READLN;END.