<em>E:\Видеозапись.avi</em>
<em>E:\График.xls</em>
<em>E:\Изображения\Аквариум.bmp</em>
<em>E:\Изображения\фото\Бия.jpeg</em>
<em>E:\Изображения\фото\Катунь.jpeg</em>
<em>E:\Тексты\буква.txt</em>
<em>E:\Тексты\цифры.doc</em>
<em>E:\Онегин.doc</em>
<em>E:\Мелодия.mp3</em>
A=2+(128/2)=2+64=66
b=7+(66/2)=7+33=40
Ответ: 40
Sub algoritm()
a = Cells(2, 3)
b = Cells(3, 3)
c = Cells(4, 3)
s = Sqr(3 * c ^ 3 + b ^ 5) / (b - c)
k = Sqr(s) + Abs(-a * b * c)
y = s + 3 * k - s ^ 4 / (b + c)
Cells(5, 3) = y
<span>End Sub
</span>
Ответ:
<em><u>Алеша</u></em>
Объяснение:
Я не делал этого, это сделал Гриша. Если это высказывание истинно, то клад спрятал Гриша. Тогда Гриша соврал сказав Я не делал этого, это сделал Алёша. Я не делал этого, но и Алёша этого не делал. Но тогда это правда, т.е. получили противоречие => Алеша соврал. Я не делал этого, но и Алёша этого не делал. Пусть это правда, тогда Я не делал этого, это сделал Гриша тоже правда. Противоречие. Тогда правду сказал Гриша. Я не делал этого, это сделал Алёша. Все сходится. Противоречий нет.
<u><em>// PascalABC.NET 3.3, сборка 1590 от 03.12.2017</em></u>
<u><em>// Внимание! Если программа не работает, обновите версию!</em></u>
begin
var a:=ArrRandom(12,-12,12); a.Println;
a:=a[1:6]+a[:1]+a[7:]+a[6:7]; a.Println
end.
<u>Пример</u>
3 12 5 -2 -5 4 0 1 -8 -3 -4 -12
12 5 -2 -5 4 3 1 -8 -3 -4 -12 0