Войти Регистрация Спроси ai-bota

Напишите код на языке паскаль!очень надо

Напишите код на языке паскаль!очень надо

Нажмите на рекламу ниже и сразу увидите ответ

↓

Популярные вопросы:

777Leha777

09.09.2021 07:46

Составьте блок схему перевода тонн в килограммы по примеру на фото...

Sahfejdie24810572947

04.08.2021 03:48

Укажите величины, которые НЕ следует представлять с таблиц: средний рост учеников класса оценки учеников класса за контрольную работу по информатике список учеников класса...

hoper123

04.08.2021 03:48

Привести 5 примеров в каких областях используются роботы. 2. Записать в тетради основные функции и принципы работы гироскопического датчика...

1298school

13.01.2021 23:31

Вкорзине лежат шары разного цвета. сообщение о том, что достали шар синего цвета несет 7 бит информации. сколько всего шаров в корзине?...

kolbasko001

13.01.2021 23:31

Даны 3 числа a,b,c. определить минимальное из них. если минимальное число окажется отрицательным , то определить количество отрицательных чисел , а иначе все положительные...

ТвОйМаЛьЧиК

23.12.2020 14:27

Выполните операцию сложения 1011111111 + 111001001, результат запишите в двоичной системе счисления...

ygorbrusnyak

28.02.2023 12:08

Решите аналитически и графически. спрос на фанту равен(10-р), предложение равно (4р-5). из-за снижения цены пепси величена спроса фанту изменилась на 10% для каждой цены....

Мила3287

08.04.2020 04:14

1.построить графики функций y1 = x 2 – 1, y2 = x2 + 1 и y = к • (y1/y2)на интервале [–3; 3] с шагом 0,3. 2.построить графики функций у = х2 и у = 2х2 в промежутке [–4; 4]...

solovyovaolena

10.02.2020 09:30

Катя записала на листе бумаги адрес страницы веб-сайта, затем порвала его и предложила подруге вике восстановить адрес страницы. в ответе выберите последовательность букв,...

victoriareih

14.05.2023 19:33

Между четырьмя (лондон, прага, москва и киев) ежедневно выполняются авиарейсы. ниже расписание перелётов между ними: путешественник оказался в аэропорту киева в 11: 00 утра....

Ответ:

Moontrick

14.05.2021 13:31

var

a:integer;

begin

readln(a);

if a mod 2 = 0 then

inc(a)

else

dec(a);

writeln(a);

end.

0,0(0 оценок)

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку