Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
shdbrjhb
08.03.2021 07:37 •
Информатика
Написать программу на языке паскаль для решения : по данным сторонам прямоугольника вычислить его периметр, площадь и длину диагонали. входные данные задать самостоятельно. для проверки подготовить код программы и результаты ее работы.
Показать ответ
Ответ:
Артеммашар
08.10.2020 14:52
Var
a,b,S,P:Integer;
d:real;
Begin
Writeln('Введите стороны прямоугольника');
Read(a,b);
P:=2*(a+b);
S:=a*b;
d:=sqrt(sqr(a)+sqr(b));
Writeln('Периметр=', P);
WriteLn('Площадь=', S);
WriteLn('Диагональ=', d:6:2);
End.
0,0
(0 оценок)
Популярные вопросы: Информатика
grandx04
17.02.2022 17:50
Вкакой жизненной ситуации могут оказаться полезными вычислительные таблицы? пример....
АнгелінаL
22.05.2020 11:41
Из непрозрачного мешочка вынимают шарики с номерками и известно, что информационное сообщение о номере шарика несет 4 бита информации. определите количество шариков в мешочке....
JumpyWizzard
22.05.2020 11:41
Сообщение записано с алфавита, содержащего 8 символов. какое количество информации несет одна буква алфавита?...
ПолинаРыжкова3
22.05.2020 11:41
Учителя начальных классов ввели поощрение учащихся за хорошую учебу: за решенную ученик получает пять конфет, за выученное стихотворение-4 конфеты, за прочитанную книгу-3 конфеты....
jiminlave449
24.05.2021 07:30
Составить программу,где нужно ввести возраст антона,бориса и виктора.и определить кто из них старше)) !...
Irina1440
25.11.2022 23:45
Опишите процесс обмена информацией в памяти компьютера ...
HollywooD2016
11.12.2020 15:21
Таблица истинности для заданного логического выражения...
sinethu
20.06.2021 23:45
Количество цифр, составляющих алфавит системы счисления, - это......
saba22
04.02.2020 21:41
Написать программу в ПИТОНЕ, не в паскале....
1232959
02.03.2023 10:39
Чему равны стороны параллелепипеда объем которого равен объему куба со стороной 5 см если известно что стороны параллелепипеда - три различный натуральных числа? перечислите все возможные...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
a,b,S,P:Integer;
d:real;
Begin
Writeln('Введите стороны прямоугольника');
Read(a,b);
P:=2*(a+b);
S:=a*b;
d:=sqrt(sqr(a)+sqr(b));
Writeln('Периметр=', P);
WriteLn('Площадь=', S);
WriteLn('Диагональ=', d:6:2);
End.