Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
elena563
23.12.2021 07:06 •
Информатика
Создайте программу на pascalabc, используя if then для рачета полупериметра треугольника (a+b+c)/2. если a< > 0 и т.д. и a+b> c и т.д.
Показать ответ
Ответ:
aynuran1
03.10.2020 08:48
Var a,b,c:real;
begin
readln(a,b,c);
if (a<>0) and (a+b>c) then writeln ((a+b+c)/2)
else
writeln('Неверные входные значения');
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
Анель1342
25.08.2021 20:19
Задание 1. Нарисуйте блок-схему решения задачи «Из трех чисел найти самое большое» (ФОТО)(КОГДА ВСТАВЛЯЕШЬ ОТВЕТ ВНИЗУ СКРЕПКА ДОБАВИТЬ ФОТО...
Натульчик67
27.04.2020 19:58
Х MONEN Стно че с выражений и строк, зерЗадание: Напиши программу для матФункции input) и print)2 352-985*25*3362-1206-21554-5282)код программы выполните в онлайн к...
matysja138
04.08.2020 08:45
Функция вывода? напишите ответ...
полинадудка
31.03.2021 06:00
Уровень b. напишите программу, которая заполняет массив из n = 10 элементов случайными числами в диапазоне [10,100] и сортирует его по возрастанию последней цифры числа (сначала...
allihen
17.01.2022 02:58
Свойства письменного стола не существенные с точки зрения потребителя...
попкорн6
17.01.2022 02:58
Подсчитать количество вхождений в текст слога ро . нужна блок схема и программу паскаль...
Burik130120
08.05.2021 22:18
Выберите типы нейронной сети (3 правильных ответа). A. Входные. B. Дендрит. C. Синапс. D. Аксон. E. Скрытые. F. Сумматор. G. Выходные....
азаззазазаазз
08.05.2021 22:18
Якій вплив мають інформаційні технології на роботу кваліфікованого робітника харчової промисловості ...
HappyPerson23
22.06.2022 08:27
. Для зберігання растрових зображень розміром 128 * 128 пікселів відвели 4 кілобайти пам яті. Яке максимально можливе число кольорів в палітрі зображення?...
baklazhan2004
28.07.2020 14:06
Вкажіть масу ортофосфатної кислоти, яка взаємодіє із цинком, якщо при цьому виділяється 1,68 л водню (за н.у...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin
readln(a,b,c);
if (a<>0) and (a+b>c) then writeln ((a+b+c)/2)
else
writeln('Неверные входные значения');
end.