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

  1. Вычислить элемент массива Т состоящий из 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.

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

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



Похожие ответы
  1. Дана матрица 7x7. Определить суммы всех элементов матрицы, лежащих на диагоналях. Помогите сделать, пожалуйста! Заранее спасибо ОГРОМНОЕ!

  1. В массиве A[1..N] найти максимальное число и уменьшить все элементы массива на 5. Вывести полученную последовательность на экран. Помогите пожалуйста!

  1. Пусть дана вещественная матрица размером n*m. Найдите среднее арифметическое наибольшего и наименьшего значений её элементов, расположенных ниже главной диагонали.- это условие. Напиши пожалуйста программу!

  1. Вычислить сумму ряда: S = √2d+√3d+√4d+…+√15d

  1. Ввести с клавиатуры одномерный массив из 5 чисел , подсчитать сумму элементов больше нуля и вывести результат на экран монитора.

  1. Ввести с клавиатуры двумерный массив из 9 чисел, подсчитать сумму элементов всего массива

  1. Вычислить С при любых значениях x, а, b:

  1. По введенным значениям аргумента х вычислить значение функции, заданной графически.Помогите пожалуйста написать программу в Паскале

  1. 1) Написать функцию с параметрами, обеспечивающую вычисление суммы элементов, находящихся ниже главной диагонали.

  1. Произвольно заданы три одномерных массива. Сформировать новый массив, состоящий из десяти элементов с наибольшими значениями исходных массивов. Помогите пожалуйста! Нужно написать программу с while и repeat!!!(отдельные)