Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
Kristina238485
08.04.2021 09:49 •
Информатика
Не могу написать программу на языке паскаль, , кто как может. заполнить массив из 12 чисел случайными числами в интервале [-12..12] и выполнить инверсию для каждой трети массива. 15 за лучший
Показать ответ
Ответ:
Evangelinaa8
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 оценок)
Популярные вопросы: Информатика
АняГоловко0208
12.06.2020 17:34
составить проект занятия по теме: Алгоритмы...
Дидог
30.05.2022 10:47
Назовите базовые компоненты HSВ-модели....
aalleeks
14.02.2020 06:27
Запишите на языке паскаль программу циклического обмена значениями трёх переменных a,b,c. схема циклического обмена: a - b - c i ^ i i например, если до обмена было:...
toalexalfaa
29.09.2020 14:56
Запиши количество текстом или соответствии ему двоичным числом...
Violettka181
29.09.2020 14:56
Даны два целочисленных массива. найти сумму элементов первого массива, стоящих на четных местах , и заменить ею все элементы второго массива , стоящие на нечетных местах(...
ЯУмницаРаЗуМнИцА
11.09.2021 19:26
Решение примера 800304-673/4+(6754-5897)*3...
Ника5324
11.09.2021 19:26
1) как изменяются кислотные и окислительно-восстановительные свойства в ряду hocl-hobr-hoi? объясните 2)почему из всех галогенов только йод образует многоосновные кислородные...
Раммроль
17.10.2021 11:50
Определите к какой группе относятся следующие свойства...
ruslanbekka
21.03.2021 18:21
Рассчитать формулы по информатике excel ...
DakotaDp
11.09.2021 19:26
Выпишите восемь слов с безударным гласным звуком в корне . запиши к каждому из них проверочное слово . найди и выпиши слова с непроизносимыми согласными . текст : у...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и 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.