дуже треба)))

дуже треба)))

  • Var x, y: real;
    begin
    write (Введіть число:);
    readln (x);
    y: = (1/8) * sqr (x) + 8 * x;
    writeln (y =, y);
    end.
  • Program program1;
    var
    y: real;
    x: integer;
    begin
    write (Введіть значення Х :);
    readln (x);
    y: = 1 / (8 * sqr (x)) + 8 * x;
    writeln (y =, y);
    readln;
    end.

Понравилась статья? Поделись с друзьями:
Добавить комментарий

;-) :| :x :twisted: :smile: :shock: :sad: :roll: :razz: :oops: :o :mrgreen: :lol: :idea: :grin: :evil: :cry: :cool: :arrow: :???: :?: :!:

16 − 12 =