101010102-2528+716=101008290
Не заданы значения переменных.
Правильный код:
<span>program Lipov_2;
var a, b, k: integer;
begin
a:=14;
b:=365;
writeln('a=', a);
</span>writeln('b=', b); <span>
k:=a*b;
writeln(a,'*',b,'=', k);
end.</span>
Как я понимаю, то растровые - GIF, JPEG, PNG, PSD, BMP.
векторные - PDF, Cdr, Swf.
Var
matrix :array[1..4, 1..4] of integer;
min, sum, i, j :integer;
begin
min := maxint;
sum := 0;
for i:=1 to 4 do
for j:=1 to 4 do
read(matrix[i, j]);
for i:=1 to 4 do
for j:=1 to 4 do
begin
if matrix[i, j] < min then
min := matrix[i, j];
sum := sum + matrix[i, j];
end;
for i:=1 to 4 do
for j:=1 to 4 do
if matrix[i, j] < (sum / 16) then
matrix[i, j] := min;
end.