1. Информатика
  2. Составить программу, которая

Составить программу, которая из неотрицательного числа извлечет корень, иначе вычислить модуль этого числа

0LOLOLOSHKA1 0LOLOLOSHKA1    3   21.05.2020 14:19    12

Ответы
milarudneva449 milarudneva449  15.10.2020 04:28

program Hello;

var x:integer;

begin

readln (x);

if x>=0 then writeln (sqrt (x))

else WriteLn(abs(x));

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
karo35 karo35  21.12.2020 15:54
Разработать алгоритм решения задачи...
Maxguvci Maxguvci  21.12.2020 15:53
Дано число 1,6112E−3. Нормализованная экспоненциальная запись данного числа: ⋅ ....
sab2021 sab2021  05.04.2020 19:52
Изык програмирования на Payton...
margo7108 margo7108  05.04.2020 19:45
Розробити інформаційну модель об єкта «Фортепіано» для розв язування задач, що постають перед: а) вантажником; б) директором магазину; в) піаністом...
mintgirl mintgirl  05.04.2020 19:44
чень надо Отдам всё! Комп ютер зчитує 3 додатних числа a, b, c. З ясувати , чи можна з них утворити трикутник?...
ananasik79 ananasik79  05.04.2020 19:40
1. Что такое формат графического файла? а) Хранение описания геометрических фигур, составляющих изображение б) Совокупность точек, образующих строки и столбцы, формирующие...
betmurzaev2015 betmurzaev2015  05.04.2020 19:13
Выбрать хотя бы один вариант ответа в каждой строчке...
vereina vereina  05.04.2020 19:00
Запусти паскаль и введи программу: var a,b,c:integer; begin a:=-34; b:=abc(a); writeln( abc(-34)= ,b); c:=sqr(b); writeln( sqr(b)= ,c); c:=sqr(b+b); writeln( sqr(b+b)=...
Оливия20 Оливия20  05.04.2020 18:59
Некоторое информационное табло в аэропорту может отображать сообщения, состоящие из 15 символов: строчных латинских букв или цифр, причем каждый символ может быть красным,...
milenkakonfetka milenkakonfetka  05.04.2020 18:57
Запиши верный ответ, если дан алгоритм: al := 2/(19x) a2 := al Ix а3:= a2/x a4:= a3 /x al + a4 От ответ (для переменной используй латинскую раскладку):...

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