Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Fortran > [General] Задание по Fortran

Автор: BigZain 16.11.2009, 22:05

Задание
Написать программу на алгоритмическом языке с использованием одномерных массивов

Дан массив A(m),m -меньше либо равно 15.Переписать элементы массива в обратном порядке и найти их сумму.Вывести на печать старый массив новый масив и полученную сумму.

Очень прошу помочь.......задача легкая но я просто чайник=((((

Автор: Cr@$h 17.11.2009, 01:45

Баш на баш. С вас понимание и ответы на вопросы преподавателя.

Код


program Arrays
    integer, parameter :: m = 5
    real, dimension(m) :: A, B
    real Summ

    A = [1.2, 3.4, 5.6, 6.7, 7.8]
    B = A(m:1:-1)
    Summ = Sum(B)

    print *, "Исходный массив:"
    print *, A
    print *, "Новый массив:"
    print *, B
    print *, "Сумма элементов:", Summ
end program Arrays

Автор: BigZain 17.11.2009, 20:40

спасибо огромное=))))))

Автор: Bolleycox 3.9.2022, 02:44