Составить программу для вычисления и вывода в виде таблицы функций

@savonina_sv · Регистрация: 16.10.2014

Author24 — интернет-сервис помощи студентам

Составить программу для вычисления и вывода в виде таблицы следующих функций. Кроме этого добавить в основную программу две подпрограммы:
1) функцию, подсчитывающую значение элемента двумерного массива;
2) процедуру, подсчитывающую одну из указанных величин по выбору
Вij=cosi + sinj
i = 1, ... , M
j = 1, ..., N
M = 5
N = 5
1) сумму чисел, стоящих под главной диагональю

@Puporev · 02.02.2015, 17:43

Pascal

uses crt;
const m=5;
      n=5;
type mas=array[1..m,1..n] of real;
function f(i,j:integer):real;
begin
f:=cos(i)+sin(j);
end;
procedure summa(b:mas);
var i,j:integer;
    s:real;
begin
s:=0;
for i:=1 to m do
for j:=1 to i-1 do
s:=s+b[i,j];
write('Сумма под главной диагональю=',s:0:2)
end;
var b:mas;
    i,j:integer;
begin
clrscr;
writeln('Таблица');
for i:=1 to m do
 begin
  for j:=1 to n do
   begin
    b[i,j]:=f(i,j);
    write(b[i,j]:6:2);
   end;
  writeln;
 end;
summa(b);
readln
end.

@savonina_sv 0 / 1 / 0 Регистрация: 16.10.2014 Сообщений: 91
		1
	Составить программу для вычисления и вывода в виде таблицы функций 02.02.2015, 17:16. Показов 1192. Ответов 1 Метки нет (Все метки) Составить программу для вычисления и вывода в виде таблицы следующих функций. Кроме этого добавить в основную программу две подпрограммы: 1) функцию, подсчитывающую значение элемента двумерного массива; 2) процедуру, подсчитывающую одну из указанных величин по выбору Вij=cosi + sinj i = 1, ... , M j = 1, ..., N M = 5 N = 5 1) сумму чисел, стоящих под главной диагональю 0

	02.02.2015, 17:43

Составить программу для вычисления и вывода в виде таблицы функций

Решение