Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
0 / 0 / 0
Регистрация: 12.06.2022
Сообщений: 3

Если х и у отрицательны, то каждое значение заменить его модулем

12.06.2022, 14:43. Показов 295. Ответов 3
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Даны действительные числа х и у. Если х и у отрицательны, то каждое значение заменить его модулем; если оба значения принадлежат отрезку [1;5], то оба значения уменьшить в 10 раз; в остальных случаях оставить их без изменения.
0
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
12.06.2022, 14:43
Ответы с готовыми решениями:

Если x, y отрицательны, то каждое значение заменить его модулем
2.Даны действительные числа x, y. Если x, y отрицательны, то каждое значение заменить его модулем; если отрицательное только одно из них,...

Если x, y отрицательны, то каждое значение заменить его модулем
1) Даны действительные числа X, Y. Если X, Y. – отрицательны, то каждое значение заменить его модулем; - если отрицательно только одно...

Если x, y отрицательны, то каждое значение заменить его модулем
Даны действительные числа x, y. Если x, y отрицательны, то каждое значение заменить его модулем; если отрицательное только одно из них, то...

3
Модератор
Эксперт Pascal/DelphiЭксперт NIX
 Аватар для bormant
7816 / 4635 / 2837
Регистрация: 22.11.2013
Сообщений: 13,159
Записей в блоге: 1
12.06.2022, 15:09
Основная идея:
Pascal
1
2
3
4
5
if x*y>0 then begin
  x:=Abs(x); y:=Abs(y);
end else if (1<=x) and (x<=5) and (1<=y) and (y<=5) then begin
  x:=x/10; y:=y/10;
end;
0
Вирусоборец
 Аватар для thyrex
14450 / 7489 / 1582
Регистрация: 06.09.2009
Сообщений: 27,133
12.06.2022, 19:07
bormant,
if x*y>0 then begin x:=Abs(x); y:=Abs(y); end
этого мало, потому как вместо
Bash
1
2
Введите два числа: 2 2
Результат: 0.2 0.2
получим
Bash
1
2
Введите два числа: 2 2
Результат: 2 2
0
Модератор
Эксперт Pascal/DelphiЭксперт NIX
 Аватар для bormant
7816 / 4635 / 2837
Регистрация: 22.11.2013
Сообщений: 13,159
Записей в блоге: 1
12.06.2022, 19:39
Цитата Сообщение от thyrex Посмотреть сообщение
мало
Да мало.
Pascal
1
if (x<0) and (y<0) then begin
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
12.06.2022, 19:39
Помогаю со студенческими работами здесь

Если х и у отрицательны, то каждое значение заменить его модулем
\. Даны действительные числа х и у. Если х и у отрицательны, то каждое значение заменить его модулем; если отрицательно только одно из...

Если x, y отрицательны, то каждое значение заменить его модулем
помогите не могу написать код... напишите программу пожалуйста... Даны действительные числа x, y. Если x, y отрицательны, то каждое...

Даны 3 числа, если они отрицательны, то каждое значение заменить его модулем
даны 3 числа если они отрицательны, то каждое значение заменить его модулем. Если одно из них отрицательно, то оба значения уменьшить в 2...

Даны действительные числа x, y. Если х и у отрицательны, то каждое значение заменить его модулем
Товарищи программисты, помогите с выполнением 1. Даны действительные числа х, у. Если х и у отрицательны, то каждое значение заменить его...

Даны действительные числа X, Y. Если X, Y. – отрицательны, то каждое значение заменить его модулем
Даны действительные числа X, Y. Если X, Y. – отрицательны, то каждое значение заменить его модулем;если отрицательно только одно из них, то...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
4
Ответ Создать тему
Новые блоги и статьи
Переходник USB-CAN-GPIO
Eddy_Em 20.03.2026
Достаточно давно на работе возникла необходимость в переходнике CAN-USB с гальваноразвязкой, оный и был разработан. Однако, все меня терзала совесть, что аж 48-ногий МК используется так тупо: просто. . .
Оттенки серого
Argus19 18.03.2026
Оттенки серого Нашёл в интернете 3 прекрасных модуля: Модуль класса открытия диалога открытия/ сохранения файла на Win32 API; Модуль класса быстрого перекодирования цветного изображения в оттенки. . .
SDL3 для Desktop (MinGW): Рисуем цветные прямоугольники с помощью рисовальщика SDL3 на Си и C++
8Observer8 17.03.2026
Содержание блога Финальные проекты на Си и на C++: finish-rectangles-sdl3-c. zip finish-rectangles-sdl3-cpp. zip
Символические и жёсткие ссылки в Linux.
algri14 15.03.2026
Существует два типа ссылок — символические и жёсткие. Ссылка в Linux — это запись в каталоге, которая может указывать либо на inode «файла-ИСТОЧНИКА», тогда это будет «жёсткая ссылка» (hard link),. . .
[Owen Logic] Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора
ФедосеевПавел 14.03.2026
Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора ВВЕДЕНИЕ Выполняя задание на управление насосной группой заполнения резервуара,. . .
делаю науч статью по влиянию грибов на сукцессию
anaschu 13.03.2026
прикрепляю статью
SDL3 для Desktop (MinGW): Создаём пустое окно с нуля для 2D-графики на SDL3, Си и C++
8Observer8 10.03.2026
Содержание блога Финальные проекты на Си и на C++: hello-sdl3-c. zip hello-sdl3-cpp. zip Результат:
Установка CMake и MinGW 13.1 для сборки С и C++ приложений из консоли и из Qt Creator в EXE
8Observer8 10.03.2026
Содержание блога MinGW - это коллекция инструментов для сборки приложений в EXE. CMake - это система сборки приложений. Здесь описаны базовые шаги для старта программирования с помощью CMake и. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru