profile
Размещено 5 лет назад по предмету Информатика от NameXD

Срочно!!! Написать три программы на паскале.
1) Составить программу для вычисления площади, периметра и длины диагонали.
2)Составить программу для нахождения суммы, разности, произведения, частности введенные с клавиатуры.
3) Дано: треугольник ABC произвольный. Составить программу для вычисления его площади.

  1. Ответ на вопрос
    Ответ на вопрос дан zx1z2345
    Если надо на паскале, то вот 2й номер.


    program calc;
    var  a, b, c: real;
    var  d: integer;
    begin  write('Введите числа (Внимание, если вы хотите произвести вычитание/деление, то введите уменьшаемое/делимое число первым.');  readln(a, b);  write('Введите код операции. 1-сложение. 2-вычитание. 3-умножение. 4-деление.');  readln(d);  case d of     1: c := a + b;    2: c := a - b;    3: c := a * b;    4: c := a / b;  else    writeln('Ошибка');  end;  writeln('Ответ:', c);end.
  2. Ответ на вопрос
    Ответ на вопрос дан Аккаунт удален
    // PascalABC.NET 3.3, сборка 1599 от 17.12.2017
    // Внимание! Если программа не работает, обновите версию!

    begin
      var (a,b):=ReadReal2('Укажите длины сторон прямоугольника:');
      Writeln('Площадь=',a*b,', периметр=',2*(a+b),
          ', диагональ=',Sqrt(a*a+b*b):0:5)
    end.

    Пример
    Укажите длины сторон прямоугольника: 13.6 8.4
    Площадь=114.24, периметр=44, диагональ=15.98499

    begin
      var (a,b):=ReadReal2('Введите a и b:');
      Writeln('a+b=',a+b,', a*b=',a*b,', a/b=',a/b)
    end.

    Пример
    Введите a и b: 134.23 -15.7
    a+b=118.53, a*b=-2107.411, a/b=-8.54968152866242

    begin
      var (a,b,c):=ReadReal3('Введите стороны треугольника:');
      var p:=(a+b+c)/2;
      Writeln('S=',Sqrt(p*(p-a)*(p-b)*(p-c)):0:3)
    end.

    Пример
    Введите стороны треугольника: 13 8 11.3
    S=44.843
Не тот ответ на вопрос, который вам нужен?
Найди верный ответ
Самые новые вопросы
tegysigalpa2012
Русский язык - 6 лет назад

Помогите решить тест по русскому языку тест по русскому языку «местоимение. разряды местоимений» для 6 класса 1. укажите личное местоимение: 1) некто 2) вас 3) ни с кем 4) собой 2. укажите относительное местоимение: 1) кто-либо 2) некоторый 3) кто 4) нам 3. укажите вопросительное местоимение: 1) кем-нибудь 2) кем 3) себе 4) никакой 4. укажите определительное местоимение: 1) наш 2) который 3) некий 4) каждый 5. укажите возвратное местоимение: 1) свой 2) чей 3) сам 4) себя 6. найдите указательное местоимение: 1) твой 2) какой 3) тот 4) их 7. найдите притяжательное местоимение: 1) самый 2) моего 3) иной 4) ничей 8. укажите неопределённое местоимение: 1) весь 2) какой-нибудь 3) любой 4) этот 9. укажите вопросительное местоимение: 1) сколько 2) кое-что 3) она 4) нами 10. в каком варианте ответа выделенное слово является притяжательным местоимением? 1) увидел их 2) её нет дома 3) её тетрадь 4) их не спросили

Информация

Посетители, находящиеся в группе Гости, не могут оставлять комментарии к данной публикации.