Регистрация
10802
22.02.2020 11:25
Информатика
Есть ответ 👍

Сделать тест по информатике

119
467
Посмотреть ответы 1

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

jekaroikp00z44
jekaroikp00z44
4,4(51 оценок)

program a;

uses crt;

var i: integer;

 

function fun(x: real): real;

begin

fun: =exp(3*ln(x));

end;

 

begin

clrscr;

for i: =1 to 6 do begin

writeln('f( ',2*i,')= ', fun(2*i));

end;

readkey;

end.

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