Задать вопрос
31 января, 14:28

Задача_1: Составить программу на языке Паскаль для вычисления выражения y:=sqr (x) + x/3+sqr (sin (x)) Задача_2: Составить программу на языке Паскаль для вычисления площади треугольника по трем сторонам (подсказка: это формула Герона) Задача_3: Составить программу на языке Паскаль, которая переставляет местами цифры в двухзначном числе (например 75 заменит на 57)

+1
Ответы (1)
  1. 31 января, 15:07
    0
    1)

    var

    x:real;

    begin

    Readln (x) ;

    Writeln ('y = ', sqr (x) + x/3+sqr (sin (x))) ;

    end.

    2)

    var

    p, a, b, c:real;

    begin

    Readln (a, b, c) ;

    p: = (a+b+c) / 2;

    Writeln ('S = ', sqrt (p * (p-c) * (p-b) * (p-a))) ;

    end.

    3)

    var

    a:integer;

    begin

    Readln (a) ;

    a: = a div 10 + (a mod 10) * 10;

    Writeln (a) ;

    end.
Знаете ответ?
Сомневаетесь в ответе?
Найдите правильный ответ на вопрос ✅ «Задача_1: Составить программу на языке Паскаль для вычисления выражения y:=sqr (x) + x/3+sqr (sin (x)) Задача_2: Составить программу на ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы