Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
zzzXXXD
19.12.2020 08:04 •
Информатика
Перевести с алгоритма на паскаль алг выражение нач цел х вещ у ввод х если х больше 0 то у равен корень из х иначе у равен abs(х) все вывод у конец
Ответ:
кавказец78
08.10.2020 08:15
Конечно, в таком стиле не пишут, но это специально для Вас, чтобы было максимально похоже на "алгоритм".
PascalABC.NET 3.3.5, сборка 1644 от 23.03.2018
Внимание! Если программа не работает, обновите версию!
begin
var x:integer;
var y:real;
Read(x);
if x>0
then y:=Sqrt(x)
else y:=Abs(x);
Writeln(y)
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
FedorAche
30.04.2022 03:43
Определите значение целочисленных переменных a и b после выполнения фрагмента программы. a:=187 b:=(a div 10)+9 a:=(10*b-a) mod 9...
toseshevaanna
24.07.2021 09:21
Рассмотрим несколько программ. В начале каждой программы робот стартует из одной и той же клетки.В каждой программе отметьте строчки, которые выполнит робот.Нас интересуют...
Nastyaprokopova2003
14.12.2021 18:34
Составьте программу вычисления суммы цифр двузначного числа а.значение а введите с клавиатуры пример ввода: 35 пример вывода: сумма цифр числа 35 равна 8...
tima242
14.06.2021 04:15
Для двумерного массива целых чисел размерностью 5 на 5/ найти среднее значение положительных элементов массива...
гарристайлсс
23.02.2021 22:32
Написать программу в питоне Дано действительное число x. Напишите программу вычисления с заданной точностью приближенное значение бесконечной суммы....
elvin38
21.01.2021 22:06
Какова средняя кинетическая энергия поступательного движения молекул газа,если при концентрации молекул 2,65*10^25 м^-3 давление равно 99кпа? давление кислорода 152кпа,а...
60026072anira
21.01.2021 22:06
Какой минимальный заряд (абсолютное значение) может быть перенесен электрическим током через проводящую среду? 1)любой сколь угодно малый 2)равный заряду ядра атома 3)равный...
PrincessaMumia
21.01.2021 22:06
Как решить маша испекла 24 пирожка с капустой и 28 пирожков с повидлом какую часть всех пирожков составляли пирожки с капустой и какую часть пирожки с повидлом...
иска4578
21.01.2021 22:06
Итоги внутренней политики бориса годунова...
Dildora13
21.01.2021 22:06
Определите стихотворный размер в стихотворения давида самойлова. цитаты: а) младая слабая б) заходите, . это стол поэта. кушетка поэта. в) и начинает уставать вода. и это...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
PascalABC.NET 3.3.5, сборка 1644 от 23.03.2018
Внимание! Если программа не работает, обновите версию!
begin
var x:integer;
var y:real;
Read(x);
if x>0
then y:=Sqrt(x)
else y:=Abs(x);
Writeln(y)
end.