Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
sisake
31.05.2021 12:46 •
Информатика
Даны три числа а,в,с.составить программу,которая вычислит квадратный корень только положительных чисел
Показать ответ
Ответ:
МарусяПанда2006
04.10.2020 23:31
Паскаль:
Program one;
Var a,b,c:real;
Uses CRT; //можно не писать, команда подключает консоль
begin
Writeln('Введите 3 числа');
Readln(a,b,c);
If a>=0 then writeln(sqrt(a));
If b>=0 then writeln(sqrt(b);
If c>=0 then writeln(sqrt(c);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
krop40
03.06.2022 12:28
Сделайте и напишите готовый код...
Jubile
24.06.2021 18:55
Самые важные устройства компьютера и их функции. Чтобы просмотреть картинки на компьютере, используй . В Paint нарисованную картинку можно распечатать, используя...
andreisharik2oztjdr
09.04.2022 07:55
знающие люди решить. аня саша и петя решили создать фотоальбом ,посвященный празднику первого звонка . аня принесла на 22 фотографии меньше ,чем петя . если анины...
zaninartur
08.03.2020 10:33
Реферат на тему роботы в современном мире...
Minecraftserver34
08.06.2023 10:26
Что относится к прикладномупрограммному обеспечению?...
Анастасия8383
18.04.2022 21:42
Спецификация проверочных работ для учащихся 11 класса Компьютерные сети Задание 1. Как называется протокол, предназначенный для передачи гипертекста (текста со ссылкой...
gagag590
22.12.2021 11:58
Начертить схему предложения.женщина сказала ему при первой же встрече что ей не нравиться такая дикая жизнь....
Arina200444
22.12.2021 11:58
Кколодцу ведут 3 тропинки. сколькими можно пройти к колодцу?...
lizarodkina
22.12.2021 11:58
Барій хлорид масою 16 г розчинили у воді масою 64 г....
Sm112004
22.12.2021 11:58
Составить 10 предложений по принципу сущ.- сущ. например апрель середина весны...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
Program one;
Var a,b,c:real;
Uses CRT; //можно не писать, команда подключает консоль
begin
Writeln('Введите 3 числа');
Readln(a,b,c);
If a>=0 then writeln(sqrt(a));
If b>=0 then writeln(sqrt(b);
If c>=0 then writeln(sqrt(c);
end.