Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
oksanademyanov
17.08.2022 19:30 •
Информатика
По информатике.вычислить p и s ромба у которого сторона и меньшая диагональ=a нужно решить через программу pascal abc
Показать ответ
Ответ:
Nikidiy
06.10.2020 19:43
Var p, s, a: real;
begin
writeln ('Введите число a');
readln(a);
p:=4*a;
s:=a*a*sqrt(3)/4;
writeln('Периметр ромба равен ', p:2:2);
writeln('Площадь ромба равна ', s:2:2);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
АминаМингазова
24.07.2022 01:48
Установите соответствие. А меньше В A=B A А больше или равно В А не равно В А =В А В...
mashasumashedsoziogw
13.04.2021 07:23
Реферат на тему: Этапы решения задач на компьютере. Типы и структуры данных. Напишите реферат на эту тему по информатике 10 класс...
Sa4eR
24.07.2022 10:01
, просто напишите порядок ,...
Дони1214
19.08.2021 13:46
Введите 2 целых числа. Преобразуйте числа в две строки, объедините их в одну сроку и выведите на экран результат. C++...
данчик321
18.01.2022 16:09
1) дано число 87395120474. в нём удалили 3 цифры, сдвинув оставшиеся вместе и не меняя их порядок следования. какое минимальное число, делящееся на три, можно получить таким...
Раола
08.05.2022 09:00
Замени в слове гласную и запиши новые слова : сон- сыр- суд- дом- тик- пил- дул- мел-...
ryazhechkina
11.02.2020 21:47
Запиши произведение чисел 8 и 5 и вычисли его используя сложение...
зарина298
11.02.2020 21:47
Сколько будет (456786534-345675423): (345-344)*864=?...
ksyuksu1234
11.02.2020 21:47
Какие растения имеют все органы а.водоросли б.мхи в.папоротники г.хвойные д.цветковые...
AD1628
11.02.2020 21:47
Решить пример в столбик . 4)2,8*5,14. !...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin
writeln ('Введите число a');
readln(a);
p:=4*a;
s:=a*a*sqrt(3)/4;
writeln('Периметр ромба равен ', p:2:2);
writeln('Площадь ромба равна ', s:2:2);
end.