Если задача заключается в том, что нужно поменять местами два столбца матрицы, то в приведенном фрагменте много лишних переменных. Программа: Program JHK; const n=5; var d:array[1..n,1..n]of real; i,j:integer; a:real; begin writeln('Исходный массив:'); for i:=1 to n do begin for j:=1 to n do begin d[i,j]:=sin(i+j); write(d[i,j]:6:2); end; writeln; end; for i:=1 to n do begin a:=d[i,1]; d[i,1]:=d[i,n]; d[i,n]:=a; end; writeln('Измененный массив:'); for i:=1 to n do begin for j:=1 to n do write(d[i,j]:6:2); writeln; end; end.
Какие программы предназначены для обработки текстовой информации? называют представление информации изображённой в виде нулей и единиц?двоичное кодированиедесятичное кодированиекомпьютерные величиныцифровая кодировкаКак выглядит число 116 в двоичном представлении:111100110011111110001110100Что такое файл?программа, хранящаяся на компьютере;минимальная единица измерения количества информации;это информация, хранящаяся в долговременной памяти как единое целое и обозначенная именемабзац текста, распечатанный на принтере.Сколько битов составляет 72 байт?72 битов576 битов9 битов8 битовОтметьте понятие среди следующих словосочетаний:Надо починить компьютерЖесткий дискВ нашем классе есть отличникиПонятие – это форма мышления, которая отражает совокупность существенных признаков объекта или нескольких объектов.Определите вид следующего суждения: «Все собаки лают» двоичное число 11011 в десятичную систему счисления4311027Расширение txt, rtf, doc имеют:исполняемые файлыграфические файлытекстовые файлызвуковые файлы Выделите общее понятие:ОзероМоскваВолгаПушкин
var a,b,c:real;
begin
writeln('Введите 3 числа');
readln(a,b,c);
if a>b then
if b>c then
writeln(a*b)
else
begin
writeln(a*c);
end
else
begin
if a>c then
writeln(a*b)
else
begin
writeln(b*c);
end;
end;
end.