Вычислить элемент массива Т состоящий из 8 элементов - Turbo Pascal

Формулировка задачи:

Вычислить элемент массива Т состоящий из 8 элементов:


textual

Код к задаче: «Вычислить элемент массива Т состоящий из 8 элементов - Turbo Pascal»

const
  n = 8;
var
  T : array[1..n] of real;
  i : integer;
begin
  for i := 1 to n do
  begin
    if cos(i) >= 0.3 then T[i] := ln(i + 1)
    else T[i] := 2 * ln(i + 1) / ln(10);
    write(T[i]:6:2)    
  end;
  readln
end.
Эта работа вам не подошла?

Вы всегда можете заказать любую учебную работу у наших авторов от 20 руб.


СДЕЛАЙТЕ РЕПОСТ

13   голосов, оценка 3.923 из 5

Источник
Похожие ответы