Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
MadMax818
26.01.2022 11:52 •
Другие предметы
Выберите утверждения, характеризующие Канаду. ответ запишите в виде последовательности букв в алфавитном порядке.
Показать ответ
Ответ:
elena2213
06.06.2020 02:07
Var katOne, katTwo : integer;
Begin
Write('Введите катеты');
Readln(katOne, katTwo);
if (katOne > 0) and (katTwo > 0) then
writeln('Площадь = ', katOne*katTwo/2, 'Периметр = ', katOne + katTwo + sqrt(katOne*katOne + katTwo*katTwo)
else writeln('Error')
Readln()
End.
0,0
(0 оценок)
Популярные вопросы: Другие предметы
savolyukm
31.07.2022 05:47
Какая из этических концепций вам ближе и почему?...
Novaya22
08.12.2021 13:56
Беларуская лі! парады антону мэры кэт м. лупсякоў...
zero161
02.02.2020 06:23
Чому суспільство має розвиватися тільки за певними принципами.соціологія...
ekhvalebo
26.11.2022 01:44
Помгите по этике в каких случиях человек должен приоялять чувство долга?...
ARTEMONUM
08.08.2021 10:11
Решите по информатике за 9 класс,тема линейные алгоритмы, ,вопросы в закрепе в каитинке...
ЯнаКорягина
08.05.2021 08:21
Определить расстояние до альфа персея по астрономии , решить ...
alena0bashinskaya
01.01.2020 19:34
Технологическая карта любимого варенья ! 20...
pocemonpickachu
23.08.2022 00:08
Начертить 3 вида : сверху, сбоку и с лицевой ...
Djunisova
10.11.2020 23:42
Сделайте таблицу по астрономи50 ...
yliatroshenko
09.09.2020 00:24
Было два друга. 1 друг и 2 друг. 1 друг задолжал 2 другу, 3 рубля. как это вышло.. однажды 2 другу понадобилась одна вещь, один он не мог идти за ней. 2 другу пришлось просить 1 друга...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
Begin
Write('Введите катеты');
Readln(katOne, katTwo);
if (katOne > 0) and (katTwo > 0) then
writeln('Площадь = ', katOne*katTwo/2, 'Периметр = ', katOne + katTwo + sqrt(katOne*katOne + katTwo*katTwo)
else writeln('Error')
Readln()
End.