Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
hudognik78
21.07.2020 01:37 •
Информатика
Написать программу в паскале найти периметр и площадь прямоугольного треугольника, если даны длины его катетов a и b.
Показать ответ
Ответ:
adel1288
13.07.2020 20:46
Var a,b:integer;
c:real;
begin
Write('a='); readln(a);
Write('b='); readln(b);
c:=sqrt(sqr(a)+sqr(b));
Writeln('P= ',a+b+c);
Writeln('S= ',(a*b)/2);
end.
Пример:
a=5
b=12
P= 30
S= 30
0,0
(0 оценок)
Популярные вопросы: Информатика
dfghfgjkhfdjkgh
27.10.2020 07:20
Рабочая область программы SketchUp содержит?Острока состоянияОкно инструктораобласть моделированияСтрока заголовкаСтрока менюПанель инструментовВсе варианты верны...
матвей467
13.08.2020 13:36
Как в программе Krita создать фон ( у меня он говорит тут рисовать нельзя когда я создаю фон ) И как его переместить по заде всех объектов, то есть где кнопка слоев. Кто...
228795111
09.07.2021 18:48
10.Файл размером 512 Кбайт передаётся через некоторое соединение со скоростью 1024 бит в секунду. Определите размер файла (в Кбайт), который можно передать за то же время...
prokop228
03.03.2022 10:14
69б PYTHON Напишите программу, которая перебирает строку, в которой находится следующий текст: b22%2mZUk$hv3^b^3s85Q#Вместо букв вывести цифру 1Вместо цифр вывести цифру...
id95874775
27.07.2020 06:50
Додайте спрайта Кота. 3. Доповніть проект, таким чином, щоб при торканні стрілкою синьої лінії - зверху, по центру спрайт кіт намалював зелений квадрат, а при торкання червоної...
nurik139
24.01.2021 17:17
Напишите наименьшее число х для которого истинно высказывание (x 50) И (x кратно 10)...
В1к11
24.09.2020 14:01
-тапсырмаМәтіндегі қою қаріппен жазылған етістіктерге болымсыздық жұрнағынжалға. Мәтін мазмұнына қандай өзгеріс енгенін түсіндіріп айт.не бойтесь прочтите задание и все...
Fkbyfitdxtyrj
24.09.2020 14:01
Чего требует интеллектуальные музыкальные произведения от исполнителя и чего от слушателя?...
lubovmarkina3
24.03.2020 23:33
Нарисуйте круг длиной 6 см и получите дугу круга с радиусом 5 см. Найдите степень этой дуги....
глупыйенот
24.03.2020 23:33
нужно выбрать правильный ответ.ДЛЯ МУЛЬТИФАКТОРИАЛЬНЫХ БОЛЕЗНЕЙ ХАРАКТЕРНО 1. один ген и один средовой фактор 2. один ген и много средовых факторов 3. сочетание множества...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
c:real;
begin
Write('a='); readln(a);
Write('b='); readln(b);
c:=sqrt(sqr(a)+sqr(b));
Writeln('P= ',a+b+c);
Writeln('S= ',(a*b)/2);
end.
Пример:
a=5
b=12
P= 30
S= 30