Вычислить периметр и площадь прямоугольника
Определите площадь и периметр прямоугольника со сторонами a и b
Помогите пожалуйста решить задачку на паскале: Определите площадь и периметр прямоугольника со.
Описать процедуру, вычисляющую периметр и площадь прямоугольника.
Здравствуйте, помогите, пожалуйста, решить вот эти 3 задачи в Паскале! 1. Описать процедуру.
Вычислить периметр прямоугольника, заданного координатами своих вершин на плоскости
Вычислить периметр прямоугольника, заданного координатами своих вершин на плоскости.
Вычислить периметр и площадь круга
Вычислить периметр и площадь круга при изменении радиуса от 1 до 10 см, с шагом в 1 см Помогите.
Супер-модератор
6192 / 2938 / 1300
Регистрация: 04.03.2013
Сообщений: 5,781
Записей в блоге: 1
Сообщение было отмечено Кейс как решение
Решение
1 2 3 4 5 6 7 8 9
var a, b, s : real; begin write('введите A, B: '); readln(a, b); s := a * b; writeln(s:6:2); readln end.
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
Помогаю со студенческими работами здесь
Вычислить периметр и площадь прямоугольного треугольника
Добрый день, помогите пожалуйста с задачами, еще нужна блок схема к каждой, заранее спасибо.
Вычислить периметр и площадь прямоугольного треугольника по длинам двух катетов a и b
Вычислить периметр и площадь прямоугольного треугольника по длинам двух катетов a и b.
Вычислить для треугольник все стороны,углы,периметр и площадь
Ребята,помогите пожалуйста) Буквально спасайте ))) С геометрией огромнейший напряг был ещё в.
вычислить площадь и периметр равнобедренного треугольника зная только его катеты
задача очень лёгкая но у меня не получается))) я начинающий тока. вычислить площадь (S) и.
Вычислить площадь прямоугольника, используя формулу Герона для вычисления площади треугольника
помогите ПОЖАЛУЙСТА. ФУНКЦИИ; 1,Даны длины сторон прямоугольника а и в и длина.
Если можно построить треугольник по трем данным отрезкам, то вычислить его периметр и площадь
Даны длины трех отрезков a, b, c. Если можно построить треугольник по этим трем отрезкам, то.
Или воспользуйтесь поиском по форуму:
Площадь и периметр прямоугольника
Прямоугольник – четырехугольник, у которого все углы прямые (равны 90 градусам).
Площадь прямоугольника
Для вычисления площади прямоугольника необходимо умножить его длину на ширину:
S = a×b
program RectangleArea; var sideA, sideB, area: integer; begin write('Длина: '); readln(sideA); write('Ширина: '); readln(sideB); area := sideA * sideB; writeln('Площадь прямоугольника: ', area); readln; end.
Периметр прямоугольника
Для вычисления периметра прямоугольника необходимо сложить длины всех его сторон:
P = a + b + a + b = 2×a + 2×b = 2×(a + b)
program RectanglePerimeter; var sideA, sideB, perimeter: integer; begin write('Длина: '); readln(sideA); write('Ширина: '); readln(sideB); perimeter := (sideA + sideB) * 2; writeln('Периметр прямоугольника: ', perimeter); readln; end.
Паскаль. Написать программу для вычисления площади и периметра прямоугольника, если заданы стороны прямоугольника.
var a, b: integer;
begin
write (‘a & b =’);
readln (a, b);
write (‘площадь = ‘, a*b);
write (‘периметр = ‘, 2*(a+b));
end.
Остальные ответы
Ввод сторон
Формула площади
Формула периметра
Вывод площади и периметра
Всё
КубленОракул (97009) 7 лет назад
осталось описание переменных!
А БЕЗ программы сможешь?
напиши формулы — помогу запрограммировать
Занимаюсь программированием и разработкой софта! Опыт разработки ПО более 5 лет, выполняю работы по программированию различной сложности и на любом языке.
мои контакты для связи:
dmitriperov001@gmail.com
WhatsApp +7*9*616*07*44*18
Похожие вопросы
Ваш браузер устарел
Мы постоянно добавляем новый функционал в основной интерфейс проекта. К сожалению, старые браузеры не в состоянии качественно работать с современными программными продуктами. Для корректной работы используйте последние версии браузеров Chrome, Mozilla Firefox, Opera, Microsoft Edge или установите браузер Atom.
Вычислить площадь и периметр прямоугольного треугольника по двум сторонам
Вычисление периметра и площади квадрата. Четыре варианта решения задачи. В том числе вариант решения на PascalABC.NET, без использования устаревших конструкций (с точки зрения этой версии).
Четыре варианта решения задач: 1) по двум катетам — только вычисление, 2) по катету и гипотенузе, 3) проверка условия, 4) использование циклов while и repeat
Задача №1. По двум катетам
Задание:
Вычислить площадь и периметр прямоугольного треугольника по двум катетам
Program Triangle1;
Var K1, K2, G, Perimeter, Square : Real;
begin
writeln(‘Площадь и периметр прямоугольного треугольника ‘);
write(‘Введите катеты треугольника ‘);
readln(K1, K2);
G := Sqrt(Sqr(K1) + Sqr(K2)); < Длина гипотенузы >
Perimeter := K1 + K2 + G; < Вычисление периметра >
Square := (K1 * K2) / 2; < Вычисление площади >
writeln(‘Периметр треугольника ‘, Perimeter);
writeln(‘Площадь треугольника ‘, Square);
end.
Задача №2. По катету и гипотенузе
Задание:
Вычислить площадь и периметр прямоугольного треугольника по катету и гипотенузе
Program Triangle1;
Var K1, K2, G, Perimeter, Square : Real;
begin
writeln(‘Площадь и периметр прямоугольного треугольника ‘);
write(‘Введите катет треугольника ‘);
readln(K1);
write(‘Введите гипотенузу треугольника ‘);
readln(G);
K2 := Sqrt(Sqr(G) + Sqr(K1)); < Длина второго катета >
Perimeter := K1 + K2 + G; < Вычисление периметра >
Square := (K1 * K2) / 2; < Вычисление площади >
writeln(‘Периметр треугольника ‘, Perimeter:8:5);
writeln(‘Площадь треугольника ‘, Square:8:5);
end.
Задача №3. По гипотенузе и одному из катетов. Использование оператора if
Задание:
Вычислить площадь и периметр прямоугольного треугольника по гипотенузе и одному из катетов
Проверить, существует ли треугольник, с введёнными значениями сторон
Program Triangle3;
Var
K1, K2, G, Perimeter, Square : Real;
begin
writeln(‘Площадь и периметр прямоугольного треугольника ‘);
write(‘Введите катет треугольника ‘);
readln(K1);
write(‘Введите гипотенузу треугольника ‘);
readln(G);
if (K1 < Проверить - катет меньше гипотенузы? >
K2 := Sqrt(Sqr(G) + Sqr(K1)); < Длина второго катета >
Perimeter := K1 + K2 + G; < Вычисление периметра >
Square := (K1 * K2) / 2; < Вычисление площади >
writeln(‘Периметр треугольника ‘, Perimeter:12:6);
writeln(‘Площадь треугольника ‘, Square:12:6);
end
else writeln(‘Гипотенуза должна быть больше катета’);
end.
Замечание:
В процедуре вывода writeln используется форматированный вывод переменной. Perimeter:12:6 обозначает, что для вывода значения переменной Perimeter будет использоваться 12 позиций, в том числе 6 после запятой.
Задача №4. Использование циклов while и repeat
Задание:
1. Вычислить площадь и периметр прямоугольного треугольника по гипотенузе и одному из катетов
2. Если введённое значение катета больше гипотенузы, то сообщить об ошибке.
3. Спросить у пользователя «Продолжить вычисления?».
Program Triangle4;
Var
K1, K2, G, Perimeter, Square : Real;
Calc : Boolean;
Answer : Char;
begin
Calc := True; < Присвоить переменной начальное значение >
while Calc do begin < Выполнять цикл, до тех пор пока условие истинно >
writeln(‘Площадь и периметр прямоугольного треугольника ‘);
write(‘Введите катет треугольника ‘);
readln(K1);
write(‘Введите гипотенузу треугольника ‘);
readln(G);
if (K1 < Проверить - катет меньше гипотенузы? >
K2 := Sqrt(Sqr(G) + Sqr(K1)); < Длина второго катета >
Perimeter := K1 + K2 + G; < Вычисление периметра >
Square := (K1 * K2) / 2; < Вычисление площади >
writeln(‘Периметр треугольника ‘, Perimeter:8:5);
writeln(‘Площадь треугольника ‘, Square:8:5);
end
else writeln(‘Катет не может быть больше или равен гипотенузе’);
repeat < Цикл для проверки введённого значения Y, y, N, n >
write(‘Продолжить вычисления Y / N ‘);
readln(Answer);
if (Answer = ‘N’) or (Answer = ‘n’) then Calc := False; < Если введённое значение N или n, то завершить программу >
until (Answer = ‘Y’) or (Answer = ‘y’) or (Answer = ‘N’) or (Answer = ‘n’) < Проверка условия для завершения цикла >
end;
writeln(‘Программа завершила работу.’);
end.
Площадь треугольника по формуле Герона. Три варианта. Во втором примере используется оператор перехода GOTO. Третий пример написан, с учётом рекомендаций PascalABC.NET
Вычисление периметра и площади квадрата. Четыре варианта решения задачи. В том числе вариант решения на PascalABC.NET, без использования устаревших конструкций (с точки зрения этой версии).