Как найти площадь параллелограмма программа

Zhenekk

11 / 4 / 1

Регистрация: 22.09.2012

Сообщений: 102

1

Вычисление площади параллелограмма

23.09.2012, 00:11. Показов 20827. Ответов 7

Метки нет (Все метки)


Студворк — интернет-сервис помощи студентам

Была дана задача на языке паскаль написать программу вычисления площади параллелограмма.
Никак не мог закончить программу, не знал завершения. Заглянул в конец книги с ответами (когда не знаю как писать программу я заглядываю в ответы и запоминаю, что делает каждая функция.)
Вот сам код:

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
var
a,b,c: real;
begin
writeln('вычесление площади параллелограмма');
writeln('введите исходные данные:');
write('длина:');
readln(a);
write('ширина:');
readln(b);
c:=a*b;
writeln('площадь параллелограмма', c:6:2,'кв.см.');
readln
end.

Не понятно как работает функция “c:6:2” в строке “writeln(‘площадь параллелограмма’, c:6:2,’кв.см.’);” Может кто-нибудь подскажет, что она делает, то что она находит площадь параллелограмма я уже понял, а в каких примерах она еще используется можете сказать и дать пару кодов в качестве примера, чтобы я знал для чего она.



0



Pahanuch

328 / 163 / 89

Регистрация: 03.11.2010

Сообщений: 920

23.09.2012, 02:08

2

Zhenekk,

Цитата
Сообщение от Zhenekk
Посмотреть сообщение

функция “c:6:2” в строке “writeln(‘площадь параллелограмма’, c:6:2,’кв.см.’)

это вывод. Сама запись “c:6:2” – <переменная>:<число знаков целой части>:<число знаков после запятой>. Площадь находится здесь

Pascal
1
c:=a*b;

.



1



11 / 4 / 1

Регистрация: 22.09.2012

Сообщений: 102

23.09.2012, 07:50

 [ТС]

3

Цитата
Сообщение от Pahanuch
Посмотреть сообщение

Zhenekk:<число знаков целой части>:<число знаков после запятой>.

Что-то не понял. Можно еще как-то по другому описать это. Эти числа знаков целой части и запятой к чему относятся?
P.S. Уж извините, что не понял, программирование осваиваю в одиночку, что очень сложно, иногда и элементарного не понимаю.



0



Фрилансер

3417 / 2814 / 3000

Регистрация: 08.02.2012

Сообщений: 8,541

Записей в блоге: 1

23.09.2012, 07:56

4

Цитата
Сообщение от Zhenekk
Посмотреть сообщение

Что-то не понял. Можно еще как-то по другому описать это. Эти числа знаков целой части и запятой к чему относятся?
P.S. Уж извините, что не понял, программирование осваиваю в одиночку, что очень сложно, иногда и элементарного не понимаю.

Вот с сайта какого то взял
Write (A:N:M) – указывается формат значения переменной. Первое число после знака “:” обозначает количество позиций, выделяемых под всю переменную, а второе – под дробную часть числа. Десятичная точка тоже считается отдельным символом. Если дробная часть числа превышает указанный формат, то число округляется, при нехватке – дополняется нулями до указанного формата. Если целая часть превышает указанное число позиций, то она все равно выводится полностью
Writeln(x:5:3);

Число Результат выполнения оператора
5,3578 5.358
5,35 5.350
252,357 252.357

пользуйся поиском если не понятно когда тебе объясняют пользователи с форуму,



1



11 / 4 / 1

Регистрация: 22.09.2012

Сообщений: 102

23.09.2012, 10:26

 [ТС]

5

Спасибо за помощь. Так же скажите, можно мне в одной теме спросить код трех задач. Просто у меня в книге идут задания по изученному материалу, первые две задачи я решил, но их там еще штук 20. Вы бы мне написали код сразу трех программ я бы их разобрал и остальное попытался сам решить или придется создать три разные темы?



0



3451 / 2389 / 2135

Регистрация: 04.12.2011

Сообщений: 3,966

23.09.2012, 10:39

6

Цитата
Сообщение от Zhenekk
Посмотреть сообщение

или придется создать три разные темы?

по правилам форума – “один вопрос – одна тема”
выкладывайте, поможем чем сможем



1



Почетный модератор

7966 / 3937 / 2464

Регистрация: 30.10.2011

Сообщений: 5,377

23.09.2012, 10:39

7

Zhenekk, создайте для каждого вопроса новую тему – таковы правила форума.



0



11 / 4 / 1

Регистрация: 22.09.2012

Сообщений: 102

23.09.2012, 11:37

 [ТС]

8

Цитата
Сообщение от КонецСвета
Посмотреть сообщение

Zhenekk, создайте для каждого вопроса новую тему – таковы правила форума.

Уж извините, правила буду соблюдать, но не могу же я их все запомнить за один раз



0



Формулировка задачи:

Помогите решить задачу, срочно нужно!!!

Написать программу для вычисления площади параллелограмма. Ниже представлен рекомендуемый вид экрана во время работы:
Вычислить площадь параллелограмма.
Введите исходные данные:
Длина (см) – 9
Ширина (см) – 7,5
Площадь : 67.50 кв. см

Код к задаче: «Написать программу для вычисления площади параллелограмма»

textual

program cd;
uses crt;
var a, b:integer;s:real;
begin
clrscr;
writeln('введите исходные данные');
write('длина:');readln(a);
write('ширина:');readln(b);
s:=0.5*a*b;
writeln('площадь:',s);
readln;
end.

Полезно ли:

6   голосов , оценка 3.667 из 5

Improve Article

Save Article

Like Article

  • Read
  • Discuss
  • Improve Article

    Save Article

    Like Article

    Given integers A and B denoting the length of sides of a parallelogram and Y that is the angle between the sides and length of diagonals D1 and D2 of the parallelogram and an angle 0 at the intersection of the diagonal, the task is to find the area of the parallelogram from the information provided.

    A parallelogram is a type of quadrilateral that has equal and parallel opposite sides and angle between them is not right angle.

    Examples:

    Input: A = 6, B = 10, 0 = 30
    Output: 18.48
    Explanation:
    For the given sides 6 and 10 and for the angle 30 degree the area of parallelogram will be 18.48.

    Input: A = 3, B = 5, Y = 45
    Output: 10.61
    Explanation:
    For the given sides 3 and 5 and for the angle 45 degree the length of diagonal will be 10.61.

    Input: D1 = 3, D2 = 5, 0 = 90
    Output: 7.5
    Explanation:
    For the given diagonals 3 and 5 and for the angle 90 degree the area of parallelogram will be 7.5.

    Approach: The area of the parallelogram can be calculated by the following three formulas:

    • From given sides A and B and the angle between the diagonals, the area of the parallelogram can be calculated by the following formula:

     Area of Parallelogram for sides and angle between diagonals = ((A2 – B2) * tan 0) / 2

    • From given sides A and B and the angle between the sides, the area of the parallelogram is can be calculated by the following formula: 
       

    Area of Parallelogram for sides and angle between sides = A * B * sin Y
     

    • From the given length of diagonals D1 and D2 and the angle between them, the area of the parallelogram can be calculated by the following formula: 
       

    Area of Parallelogram for diagonals and angle between diagonals = (D1 * D2 * sin 0)/2

    Below is the implementation of the above approach:

    C++

    #include <bits/stdc++.h>

    using namespace std;

    double toRadians(int degree)

    {

      double pi = 3.14159265359;

      return ((double)degree * (pi / 180));

    }

    double Area_Parallelogram1(int a, int b,

                               int theta)

    {

        double area = (abs(tan(toRadians(theta))) / 2) *

                       abs(a * a - b * b);

        return area;

    }

    double Area_Parallelogram2(int a, int b,

                               int gamma)

    {    

      double area = (abs(sin(toRadians(gamma)))) *

                     abs(a * b);

      return area;

    }

    static double Area_Parallelogram3(int d1, int d2,

                                      int theta)

    {    

      double area = (abs(sin(toRadians(theta))) / 2) *

                     abs(d1 * d2);

      return area;

    }

    int main()

    {

      int d1 = 3;

      int d2 = 5;

      int theta = 90;

      double area = Area_Parallelogram3(d1,

                                        d2,

                                        theta);

      printf("%.2f", area);

    }

    Java

    import java.io.*;

    class GFG{

    static double Area_Parallelogram1(int a, int b,

                                      int theta)

    {

        double area = (Math.abs(Math.tan(

                       Math.toRadians(theta))) / 2) *

                       Math.abs(a * a - b * b);

        return area;

    }

    static double Area_Parallelogram2(int a, int b,

                                      int gamma)

    {

        double area = (Math.abs(Math.sin(

                       Math.toRadians(gamma)))) *

                       Math.abs(a * b);

        return area;

    }

    static double Area_Parallelogram3(int d1, int d2,

                                      int theta)

    {

        double area = (Math.abs(Math.sin(

                       Math.toRadians(theta))) / 2) *

                       Math.abs(d1 * d2);

        return area;

    }

    public static void main (String[] args)

    {

        int d1 = 3;

        int d2 = 5;

        int theta = 90;

        double area = Area_Parallelogram3(

                      d1, d2, theta);

        System.out.format("%.2f", area);

    }

    }

    Python3

    import math

    def Area_Parallelogram1(a, b, theta):

        area = (abs(math.tan(math.radians(theta)))/2)

               * abs(a**2 - b**2)

        return area

    def Area_Parallelogram2(a, b, gamma):

        area = (abs(math.sin(math.radians(gamma))))

                * abs(a * b)

        return area

    def Area_Parallelogram3(d1, d2, theta):

        area = (abs(math.sin(math.radians(theta)))/2)

                * abs(d1 * d2)

        return area

    d1 = 3

    d2 = 5

    theta = 90

    area = Area_Parallelogram3(d1, d2, theta)

    print(round(area, 2))

    C#

    using System;

    class GFG{

    static double Area_Parallelogram1(int a, int b,

                                      int theta)

    {

      double area = (Math.Abs(Math.Tan((theta *

                              Math.PI) / 180)) / 2) *

                     Math.Abs(a * a - b * b);

      return area;

    }

    static double Area_Parallelogram2(int a, int b,

                                      int gamma)

    {   

      double area = (Math.Abs(Math.Sin((gamma *

                              Math.PI) / 180))) *

                     Math.Abs(a * b);

      return area;

    }

    static double Area_Parallelogram3(int d1, int d2,

                                      int theta)

    {   

      double area = (Math.Abs(Math.Sin((theta *

                              Math.PI) / 180)) / 2) *

                     Math.Abs(d1 * d2);

      return area;

    }

    public static void Main(String[] args)

    {

      int d1 = 3;

      int d2 = 5;

      int theta = 90;

      double area = Area_Parallelogram3(d1, d2, theta);

      Console.Write("{0:F2}", area);

    }

    }

    Javascript

    <script>

    function toRadians(degree)

    {

        let pi = 3.14159265359;

        return (degree * (pi / 180));

    }

    function Area_Parallelogram1(a, b,

                                 theta)

    {

        let area = (Math.abs(Math.tan(toRadians(theta))) / 2) *

                    Math.abs(a * a - b * b);

        return area;

    }

    function Area_Parallelogram2(a, b,

                                 gamma)

    {   

        let area = (Math.abs(Math.sin(toRadians(gamma)))) *

                             Math.abs(a * b);

        return area;

    }

    function Area_Parallelogram3(d1, d2,

                                 theta)

    {   

        let area = (Math.abs(Math.sin(toRadians(theta))) / 2) *

                             Math.abs(d1 * d2);

        return area;

    }

    let d1 = 3;

    let d2 = 5;

    let theta = 90;

    let area = Area_Parallelogram3(d1, d2,

                                   theta);

    document.write(area);

    </script>

    Time Complexity: O(1)
    Auxiliary Space: O(1)

    Last Updated :
    05 Apr, 2021

    Like Article

    Save Article

    напишите, пожалуйста программу на языке паскаль для вычисления площади параллелограмма по стороне и высоте.

    игорь нескаже



    Ученик

    (111),
    закрыт



    11 лет назад

    Лучший ответ

    Удачник

    Высший разум

    (141080)


    12 лет назад

    var a, h, S: real
    begin
    readln (a);
    readln (h);
    S := a*h;
    writeln (S);
    end

    Остальные ответы

    Похожие вопросы

    написать программы для нахождения площадей: ромба трапеции круга параллелограмма​


    sasaerofeev7
    3 года назад

    параллерограмм: S = a · h; трапеция: S = 1 (a + b) · h;

    Площадь параллелограмма:

    program chet;

    var

    sq, a , b : integer;

    begin

    writeln(‘Введите стороны параллелограмма ‘);

    readln(a,b);

    sq := a * b;

    writeln(‘Площадь параллелограмма равна ‘, sq);

    end.

    Площадь трапеции:

    program chet;

    var

    sq,h, a , b : real;

    begin

    writeln(‘Введите длину оснований ‘);

    readln(a,b);

    writeln(‘Введите высоту трапеции’);

    read(h);

    sq := (a+b)/2 * h;

    writeln(‘Площадь трапеции равна ‘, sq);

    end.

    Площадь круга:

    program chet;

    const

    PI = 3.14;

    var

    sq,r : real;

    begin

    writeln(‘Введите радиус круга’);

    readln(r);

    sq := PI * sqr(r);

    writeln(‘Площадь круга равна ‘, sq);

    end.

    И площадь ромба:

    program chetdsa;

    var  

    sq,d,g : real;

    begin

    writeln(‘Введите чему равны диагонали ромба’);

    readln(d,g);

    sq := (d*g)/ 2;

    writeln(‘Площадь ромба равна ‘, sq);

    end.

    Добавить комментарий