В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
eevelinka742
eevelinka742
02.03.2022 18:30 •  Информатика

Решите паскали,вариант 5beginwritelnend.

Ответ:
Wikpiklear
Wikpiklear
06.07.2020 15:28

1.

const num_1 = 10/52;

const num_2 = sqrt(54.7);

var

 result:real;

 function sum(a,b:real):real;

 begin

    sum:=a+b;

 end;

begin

 result:=sum(num_1, num_2);

 writeln(result);

end.

2.

const x = 41.3;

const basis = 10;

var

 result:real;

begin

 result:=ln(x)/ln(basis);

 writeln(result);

end.

3.

const x = 7.5;

const y = 9.6;

var

 result : real;

 function root(x, y:real):real;

 begin

 root := exp(ln(x)/3) * exp(ln(y)/4);

 end;

begin

 result:=root(x,y);

 writeln(result);

end.

4.

const x = 1.6;

const y = 1.3;

var

 result:real;

 function gen(x,y:real):real;

 var  

   res:real;

 begin

   res:=cos(y);

   gen:=sin(x)*power(res, 3);

 end;

begin

 result:=gen(x,y);

 writeln(result);

end.

0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?