Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
anjelela799
19.01.2021 14:27 •
Информатика
Даны целые числа а,b,c.сменить знак каждого числа и вывести результат на
Показать ответ
Ответ:
LaimZ
10.08.2020 19:24
Var a, b, c: Integer;
begin
readln(a);
readln(b);
readln(c);
if a>0 then a:= (a-(a*2)) else a:= Abs(a);
if b>0 then b:= (b-(b*2)) else b:= Abs(b);
if c>0 then c:= (c-(c*2)) else c:= Abs(c);
writeln('a = ',a, ', b = ', b, ', c = ', c);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
Vlada12092009
27.10.2022 22:51
Подскажите как сделать чтобы в ответе было 2 знака после запятой??? F = int(input()) C = 5/9*(F-32) print(C)...
ZMYVKA
25.10.2021 12:40
Андрей хочет покушать пончиков, но он не уверен хватит ли ему денег. Он знает что за каждый пончик надо платить на k монет больше чем за предыдущий(то есть за i пончик он платит...
kim201
25.10.2021 12:40
4) Одномерные массивы 1. Дан одномерный массив, состоящий из N целочисленных элементов. Ввести массив с клавиатуры. Найти максимальный элемент. Вывести массив на экран в обратном...
trolz666
04.04.2023 23:49
1сложить два числа в двоичной системе счисления. результат получить в 10-ой системе 111010012 + 10110012 = 2 в системе счисления с некоторым основанием десятичное число 24 записывается...
haydarakyol1986
04.04.2023 23:49
Решить ! 1. рассчитайте информационный вес сообщения, если в алфавите 36 символов: если хочешь найти меня, встретимся в часовне 2. рассчитайте объем памяти, необходимый для хранения...
maximfz
20.07.2022 02:44
Определите порядок действий компьютера при вычислении выражения: c := a mod 10 div b * 10 + 7 div 2 / 3 * 2 // 1 2 3 4 5 6 7 В ответ запишите семь цифр без разделителей в порядке...
дженни5
04.11.2021 11:26
Замени шестнадцатеричную цифру F четырьмя двоичными цифрами (тетрадой)....
ValkyriaDemon
29.01.2023 05:46
Дан одномерный массив натуральных чисел, состоящий из N элементов (const N=10). Найти максимальную сумму элементов не кратную 3. В сумму может войти любое количество элементов....
KarinochkaShiну
08.08.2020 20:46
Сколько типов заливки содержит инструмент «Ведро»?...
DashaHB16
19.08.2020 17:15
Некое растровое изображение было сохранено в файле p1.bmp как 24-разрядный рисунок (т.е. глубина цвета = 24). Во сколько раз будет меньше информационный объём файла p2.bmp, если...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin
readln(a);
readln(b);
readln(c);
if a>0 then a:= (a-(a*2)) else a:= Abs(a);
if b>0 then b:= (b-(b*2)) else b:= Abs(b);
if c>0 then c:= (c-(c*2)) else c:= Abs(c);
writeln('a = ',a, ', b = ', b, ', c = ', c);
end.