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

(повторяю вопрос)
условие: в фото
моя программа с ошибкой, исправить
const
n=5;
var a: array[1..n,1..n] of real;
i,j: integer;
begin
for i: =1 to n do begin
for j: =1 to n do begin
a[i,j]: =(exp(3*ln(exp(5*ln(i)+(exp(5*ln(+sqr(i)/exp(1/3*(sqr(i)*sqr(i))+(sqr(j)*sqr(;
write(a[i,j]: 4);
end;
writeln;
end;
readln;
end.

Показать ответ
Ответ:
аььарпашишки
аььарпашишки
10.10.2020 12:00

const

n=5;

var A:array[1..n,1..n] of real;

i,j:integer;

begin

 for i:=1 to n do begin

   for j:=1 to n do begin

     A[i,j]:=(((i ** 5 + j ** 5) ** 3 + i ** 2)/ (i ** (4/3) + j ** 4));

     writeln(A[i,j]:4);

   end;

 writeln;

 end;

 readln;

end.

0,0(0 оценок)
Ответ:
aveiro1
aveiro1
10.10.2020 12:00

const

 n = 5;

var

 A: array[1..n, 1..n] of real;

 i, j, t: integer;

begin

 for i := 1 to n do

   for j := 1 to n do

   begin

     t := i * sqr(sqr(i)) + j * sqr(sqr(j));

     A[i, j] := (t * sqr(t) + i * i) / (exp(4 / 3 * ln(i)) + sqr(sqr(j)));

     write(A[i, j]:0:4, ' ');

   end;

 writeln;

 readln;

end.

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