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


arykovevgeny
30.04.2020 03:23

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

Нажмите на рекламу ниже и сразу увидите ответ
↓
Популярные вопросы:
Артёмка12097
Артёмка12097
05.03.2020 08:10
Дан 2х мерный массив 10х15 целых чисел. в каждом столбике определить первый нечётный элемент....
Виктория708
Виктория708
06.02.2020 07:44
Скриптардын айырмашылығы мен ұқсастығын айт пожолосто​...
ДаНьКаЗнАеТ
ДаНьКаЗнАеТ
25.09.2020 21:01
1.Електромеханічна друкуюча машина, яку використовують для передавання текстовихповідомлень дротамиA) ТелетайпБ) ТелеграфВ) Ідеограма2.Скільки байтів міститься в одному МбайтіА)...
rfgvgvvdrxxsegb
rfgvgvvdrxxsegb
11.12.2022 20:46
2. Создайте Главное окно программы. (На ПК) + / -​...
аааликкк43527
аааликкк43527
23.02.2023 13:17
Паскаль изи правильно вставьте в задачу функцию , вместо массива massiv = array [1..100] of integer; // создаём свой тип данных var max, position, n, i : integer; // объявляем...
doge232
doge232
05.03.2023 22:32
В одной из кодировок Unicode каждый символ кодируется 16 битами. Определите размер следующего предложения в байтах в данной кодировке: Я вас любил безмолвно, безнадежно,...
yernur2207
yernur2207
05.03.2023 22:32
Чему равны значения следующих характеристик стандарта 10Base-5: 1. номинальная пропускная бит/с); 2. эффективная пропускная бит/с); 3. пропускная кадр/с); 4. внутрипакетная...
ososkovaluba
ososkovaluba
10.09.2020 13:05
Що називають комп ютерною графiкою: 1.Зоображення, яке складається iз пiкселiв. 2.Зоображення що являє собою набiр пiкселiв, кожний iз яких має певний колiр. 3.Зоображення...
Сашалажа
Сашалажа
13.03.2020 01:06
У исполнителя Альфа две команды, которым присвоены номера: 1. Прибавь 1. 2. Умножь на b. (b — неизвестное натуральное число; b ≥ 2). Выполняя первую из них, Альфа увеличивает...
supanzerbe
supanzerbe
02.09.2021 01:07
Подготовьте список игровых обьектов и сцен перехода вашей компьютерной игры....
Ответ:
YomiTan
05.10.2020 15:12
Var
A:integer;
Begin
Write('A = ');ReadLn(A);
if A<0 then Write(A*A)
else Write(sqrt(A))
End.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
О НАС
СООБЩЕСТВО
ПОМОЩЬ
App
.
.
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота