Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
Grotesk1077
04.12.2021 14:24 •
Информатика
Не могу написать программу на языке паскаль, , кто как может. заполнить массив из 12 чисел случайными числами в интервале [-12..12] и выполнить инверсию для каждой трети массива. 15 за лучший
Показать ответ
Ответ:
MimINL
21.07.2020 16:26
Если решать на ПаскалЕ, то вот так:
program palindrom;
var
n, s: string;
i: integer;
b: boolean;
begin
readln(n);
for i:=1 to 4 do
s=n[5-i];
if s=n then b:=True else b:=False;
writeln(b);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
ayunatushentso
19.05.2021 09:22
12. От чего зависит выбор формы представления плана действий 13. Какие математические формулы должен знать человек, зани- мающийся ремонтом квартиры?...
nikinouston342
10.04.2021 19:59
решить информатику Составить программу, которая запрашивает число, и если оно оказывается больше 23 печатает сумму этого числа и 8, иначе печатает число меньше...
superyarmola201
19.07.2021 08:00
Какая из этих клавиш никогда не используется сама по себе ? 1)esc 2)alt 3)num lock 4)caps lock =}...
daniil9211
21.09.2022 14:38
Склавиатуры задано целое число n 5.если оно положительное. то вывести на экран его название в словесной форме.в противном случае найти квадрат этого числа. ,9 класс...
TaniaAl
10.02.2021 17:45
Найдите соответствиелинсиниалгоритмраствляюциисяалгоритмциклическийалгоритмНабора команд,Выполняемых строгоПоследовательно впорядке записи.oooКоманды, которыедолжны повторятьсяуказанное...
Arina12345678901
20.08.2021 04:59
Написать блок-схему задание: Ввести массив символов-разделителей заданной пользователем длины, а затем строку текста, общее количество символов в которой (символы, составляющие...
Valyshka11
17.11.2021 03:59
Представление любой информации в памяти любого компьютера всегда...1)непрерывное2)точное3)дискретное4)пиксельное...
В1и2к3т4о5р6и7я11
21.01.2020 18:40
с информатикой! Нужно очень...
denisst105
21.01.2020 18:40
Сколько раз исполнится следующий цикл: i:=12; Repeat i:=i-2 Until i 4;...
ДимаМасленников
17.03.2022 11:06
Выполнить практическую работу используя цикл с постусловием очень...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
program palindrom;
var
n, s: string;
i: integer;
b: boolean;
begin
readln(n);
for i:=1 to 4 do
s=n[5-i];
if s=n then b:=True else b:=False;
writeln(b);
end.