Регистрация
maksimananchenko
21.11.2022 04:44
Информатика
Есть ответ 👍

Перевести на язык паскаль, составить программу

260
343
Посмотреть ответы 2

Ответы на вопрос:

Unknown112
Unknown112
4,4(9 оценок)

ответ:

program calc3;

uses

  math;

var

  x, y: real;

begin

  write ('введите x: ');

  readln (x);

  y : = sqrt (x) / 2 / x;

  writeln ('sqrt (x) / 2 / x = ', y : 15 : 5);

  y : = power (x, 5) + power (x, 3);

  writeln ('power (x, 5) + power (x, 3) = ', y : 15 : 5);

  y : = power (x, 7) / 5;

  writeln ('power (x, 7) / 5 = ', y : 15 : 5);

  readln;

end.

Victoriahamidul
Victoriahamidul
4,6(44 оценок)
// pascalabc.net 3.2, сборка 1417 от 28.03.2017 // внимание! если программа не работает, обновите версию! begin   var a: =arrrandom(10,-50,50); a.println;   a.transform(x-> -x); a.println;   a.transform(x-> x+1); a.println;   a.transform(x-> x-3); a.println end. пример -46 23 16 -36 -19 -37 -12 11 -30 44 46 -23 -16 36 19 37 12 -11 30 -44 47 -22 -15 37 20 38 13 -10 31 -43 44 -25 -18 34 17 35 10 -13 28 -46

Популярно: Информатика