Визначити найменший елемент кожного парного рядка матриці. Знайти найбільший і найменший елемент прямокутної матриці A (m⨯n). Поміняти їх місцями. Надрукувати змінену матрицю.

Визначити номери рядків матриці A (m⨯n), хоча б один елемент яких дорівнює с, і елементи цих рядків помножити на d.

185

245

Посмотреть ответы 1

Ответы на вопрос:

yanssen1976

Информатика

4,8(83 оценок)

2) var n: integer; sum,r: longint; begin sum: =0; r: =1; readln(n); for i: =1 to n do begin sum: =sum+n; r: =r*i; end; writeln('! n=',r); writeln('ср. арифм.=',sum/n); writeln('ср. геом.=', r/n); readln end. 3) var a,b: real; i: =integer; begin readln(a); b: =0; i: =1; while b< a do begin b: =b+1/i; i: =i+1; end; writeln(b); readln; end.