Тепловоз. (Стекло+ваза - убираем первую С, меняем К на П и А на О, убираем последнюю А)
Ответ:
Пусть а - глубина цвета, k - кол-во цветов, v - объем.
V = M*N*a
V= (800*480*24)/(8*800*800)= (рассчитаешь) мб
// PascalABC.NET 3.0, сборка 1128
begin
var a:=ArrRandom(30,-10,20).Println(',');
Writeln('Сумма элементов, больших 10, равна ',
a.Where(x->x>10).Sum);
end.
<u><em>Тестовое решение:</em></u>
4,-8,-7,10,13,0,11,-6,-9,-1,-7,-6,2,19,4,-10,-6,9,4,13,-6,20,-4,15,-3,-2,-7,3,16,18
Сумма элементов, больших 10, равна 125
1)
var x,y,S:integer;
begin
x:=340;
y:=5;
x:=x div y;
y:=x mod y;
x:=x-5;
y:=y+3;
S:=x+y;
writeln(S);
end.
Ответ получился 69
2) var a, b:real;
begin
a:=3;
b:=-1;
b:=9+a*b;
a:=(b*b)/(b/a);
writeln(a);
end.
Ответ получился 18
