Реферат: Елементи та структура програми мови Паскаль

Р Е З У Л Ь Т А Т И О Б Ч И С Л Е Н Ь П Р О Г Р А М И :

22 3 3 3

4 5 6 7

3 3 3 32

2 -6 -5 4

-7 3 2 0

2 3 4 5

-7392.0 -2430.0 -2160.0 0.0

Максимальний добуток в стовбцi з номером 4 i дорiвнює 0.0

Задача 2:

program masiv_2;

uses

crt;

var

a:array [1..5,1..5] of integer;

i,j,max1,max2,min1,min2:integer;

temp:integer;

begin

clrscr;

for i:=1 to 5 do

for j:=1 to 5 do begin

write('Введiтьелемент A[',i,',',j,']=');

readln(a[i,j]);

end;

max1:=1;

min1:=1;

max2:=1;

min2:=1;

for i:=1 to 5 do