Предмет: Информатика, автор: ZigeyR

Попытка 2. Может кому не сложно

Дано двумерный массив который скадаеться с 5 строк и 8 столбцов, который вычисляется по формуле cosij + sinij. Вывести массив на экран, а также вывести сумму массива второй строки

Аноним: Но на практике учащиеся обычно боятся конфликтовать, что и позволяет существовать в школьном заведении "болоту". В результате - предмет учили, а практического толка - ноль

Аноним: Вы куда с этим ТурбоПаскалем потом? А никуда!

ZigeyR: Та может и сказано, а я так делать не могу, не разрешат. Ладно, мне нужно было всего лишь решение. Я понял свою ошибку, можем закончить этот разговор. Я один не имею никакой силы против этой системы. И я знаю всю безсмыслевость паскаля.

Аноним: Смысл информатики не в том, чтобы учить язык. Смысл в изучении базы - умения составлять алгоритмы, пользоваться базовыми информационными структурами, овладения современными понятиями и технологиями в программировании с учетом сегодняшних тенденций - структурное программирование, объектно-ориентированное программирование, функциональное программирование.

Аноним: ТурбоПаскаль закрывает дорогу практически ко всему перечисленному, кроме структурного программирования, а из структур дает только массивы и примитивные записи.

Аноним: Вот на этом и стоит закончить.

ZigeyR: ))

Аноним: А решение - может кто и напишет. Оно будет длиннее раза в 3-4.

Аноним: Или в шесть. Зависит от квалификации пишущего.

ZigeyR: Конечно

Ответы

Автор ответа: Аноним

PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018
Внимание! Если программа не работает, обновите версию!

begin
Writeln('*** Исходный массив ***');
var a:=MatrGen(5,8,(i,j)->Cos((i+1)*(j+1))+Sin((i+1)*(j+1)));
a.Println(9,5); Writeln(9*a.ColCount*'-');
Writeln('S2 = ',a.Row(3).Sum:8:5)
end.

Приложения: