Я только сам цикл замены элементов массива напишу, до этого надеюсь смогешь. Если нет - в лс напиши)
Var
bufer: integer;
bufer: = 0;
Begin
For i = 1 to 4
Begin
bufer:= x[i];
x[i]:= y[i];
y[i]:= bufer;
End;
For i = 1 to 4
write(x[i], ' ');
writeln;
For i = 1 to 4
write(y[i], ' ');
End.
Sub Zadanie16084380()
' Дана матрица Y(5,5) (элементы матрицы выбрать самостоятельно). Вы-
' числить элементы новой матрицы Z(5,5) по правилу: zij = yij / ki, где ki – количе-
' ство положительных элементов i-той строки.
' Если в i-той строке положительных элементов нет, то i-тая строка в матрице
' Z должна быть заполнена нулями
Const N = 4
Dim Y,Z,K
ReDim Y(N, N), Z(N, N), K(N)
S=""
Randomize
For i = 0 To N
K(i) = 0
For j = 0 To N
Y(i, j) = Int(100 * Rnd) - 50
S = S & Y(i, j) & " "
If Y(i, j) > 0 Then
K(i) = K(i) + 1
End If
Next
S = S & vbNewLine
Next
S = S & vbNewLine
For i = 0 To N
For j = 0 To N
if K(i) = 0 then
Z(i, j) = 0
else
Z(i, j) = Y(i, j) / K(i)
end if
S = S & Z(i, j) & " "
Next
S = S & vbNewLine
Next
MsgBox (s)
End Sub
Call Zadanie16084380()
код написан на VBScript
Разновидность компьютеров:Настольный компьютер он же «desktop» он же персональный компьютер (ПК) – в основном предназначен для работы в офисе и дома, где его размер позволяет комфортно сосуществовать вместе с человеком не занимая относительно много места (один на 4-5 кв. м.) и позволяет свободно передвигаться. Состоит из системного блока( бывают разных размеров, делаются как вертикальном так в горизонтальном исполнении) , монитора клавиатуры и манипулятора(мышка). Этот список может продолжаться но об этом немного попозже дабы вас не перегружать. В свою очередь системный блок состоит из материнской платы на которой основан весь компьютер , процессор, оперативная память, жесткий диск (устройство на котором хранится информация), видеокарта (плата отвечающая за вывод изображения на монитор), иногда в бюджетных вариантах компьютера видеокарта встраивается в материнскую плата для удешевления, но в таком варианте трех мерных игрушках можно забыть, DVD-привод.Неттоп он же сетевой компьютер - компактный, эргономичный и экономичный ( в смысле энергопотребления) настольныйкомпьютер, как правило небольшая коробочка легко поместиться в руке и может транспортироваться в небольшой сумке. Предназначен прежде всего для просмотра интернет ресурсов, цифровых фотографий, работы в тестовых и графических редакторов небольшой сложности. Надо понимать, что за компактность надо чем то платить – Вы не сможете на нем поиграться в трехмерные игры, посмотреть видео высокого качества, нормально работать с большими базами данных 1с и т.д. Зачастую это минимальные технические характеристики компьютера с той же клавиатурой монитором и т.д. к тому же без DVD привода. Технически законченное изделии и модернизации не подлежит.Моноблочный компьютер, сравнительно недавно вышедший на широкий рынок компьютер. Но все новое это хорошо забытое старое. Ране известная всем фирма «Apple» выпускала свои графические станции в таком исполнении, тогда еще мониторы с лучевыми трубками были напичканы электроникой из системного блока и представляли собой единое целое. В сегодняшним исполнении это тот же жидкокристаллический монитор но немного более толстый чем обычный. Сзади в мониторе и находится «системный блок» компактно установлены та же системная плата жесткий диск и видеокарта. Зачастую туда умудряются вставить бесперебойник, WiFi, blue tooth, кардридер и прочие сервизы. Как правило как и неттоп является и техничеси законченным изделии и плохо подвергается модернизации и улучшению. По производительности чуть ниже настольного компьютера если учитывать затраченные денежные средства на моноблк за которые можно было бы купить desktop.Нетбук (Netbook) – это младший брат ноутбука но с гораздо меньшими клавиатурой монитором в районе 10-ти дюймов ,
небольшим объемом жесткого диска до 120 Гб , (в случае с твердотелльным магнитным носителем до 30) и как правило отсутствием DVD-привода, так как его не позволяют разместить небольшие размеры. По производительности нетбук примерно равен неттопу. Тем не менее сей лэптоп на ранке все еще сущкствует, что продтверждает определенный спрос на него, хотя в последнее время его сильно потеснил планшетный ПК о котором в поговорим следуещем пункте.Планшетные ПК не так давно вошли в нашу жизнь тем не менее они с каждым днем набирают популярность хотя цена зачастую не меньше среднего ноутбука по производительности. Как правило это компьютер без клавиатуры с сенсорным монитором 7-10 дюймов. Сначала был реализован с поддержкой Windows Vista в виде пера и сенсорного ввода, но технологический прорыв в этой области совершила компания Apple, выпустившая нашумевший iPad на операционной системе android, с удобными интернет сервисами по покупке и установке разнообразных программ. Этим она взорвала рынок так так удачно воплотить идею сенсорного ПК со своей удобной клавиатурой до них еще никто не реализовывал. Как правило они реализованы на мало мощных процессорах с накопителями на твердотельных носителях. Как правило имею блоки беспроводной связи WiFi, blue tooth, кардридер, зачастую присутствует система GPS, вэбкамера, встроенный модем, и другие технические примочки. Хотя опять же самые продвинутые и дорогие из них имеют технические характеристики нетбуков. Зачастую к ним возможно подсоединить компактную клавиатуру.
1)
<span>for x in range(1,10+1)<span>:
</span> n = x**2-<span>10
</span> print('x',x,'=',x,'^2 - 10 = ',n)
Пример:
x 1 = 1 ^2 - 10 = -9x 2 = 2 ^2 - 10 = -6x 3 = 3 ^2 - 10 = -1x 4 = 4 ^2 - 10 = 6x 5 = 5 ^2 - 10 = 15x 6 = 6 ^2 - 10 = 26x 7 = 7 ^2 - 10 = 39x 8 = 8 ^2 - 10 = 54x 9 = 9 ^2 - 10 = 71x 10 = 10 ^2 - 10 = 90
2)
<span>N = int(input('N = '))
suma = <span>0
</span>for i in range(6,6*N)<span>:
</span> suma += i
print("Suma =",suma)</span>
3)
<span>m = []
s = <span>0
</span>for x in range(-6,33)<span>:
</span> s += x
m.append(x)
print("Середне = ",s/len(m))
Пример:
Середне = 13.0
</span></span>