Необходимо декодировать в читаемый текст!
209 132 32 208 189 208 185 208 182 209 137 209 132 208 191 209 133 209 131 208 180 209 145 209 141 32 208 184 209 131 208 177 208 179 209 134 208 191 32 209 145 209 145 32 208 176 209 137 209 133 208 186 32 208 188 209 132 208 183 209 143 208 184 32 208 178 209 140 209 135 209 145 209 128 209 128 32 209 143 208 179 208 186 208 185 208 190 209 132 209 145 208 184 32 208 183 208 189 209 143 209 131 32 208 176 209 132 209 145 209 140 208 177 208 187 208 191 32 208 178 208 183 208 176 208 190 208 187 209 128 209 130 32 208 190 32 209 137 209 132 209 130 208 185 208 176 32 208 189 209 136 208 185 32 208 178 208 177 209 145 209 134 209 137 209 134 209 145 208 184 32 209 138 208 186 208 187 208 178 32 209 139 208 186 208 185 208 186 32 209 143 209 128 208 182 209 139 208 183 209 137
uses
crt,math;
var s:real; i,j,f:real; a:integer;
begin
writeln('vvedite 1 chislo ');readln(i);
writeln('vvedite 2 chislo ');readln(j);
writeln('vvedite 3 chislo ');readln(f);
s:=i;
if j<s then s:=j;
if f<s then s:=f;
if s<0 then
begin
if i<0 then inc(a);
if j<0 then inc(a);
if f<0 then inc(a);
writeln('kolichestvo otricatelnix ',a:2);
end
else
begin
if i>0 then i:=i*-1;
if j>0 then j:=i*-1;
if f>0 then f:=i*-1;
end;
writeln('min chislo ',s:2:0);
readln;
end.