Условие - это a<16.
Операции присваивания - это не условие.
UV Sphere - глобус, Ico Sphere -сгенерированный треугольник, Cylinder - цилиндр, Cone - конус, Grid - плоскость, Monkey - "обезьяна" (Да , да . Именно обезьяна)
Program prl;
uses crt;
var i,n,summa:integer;
srednee:real;
a:arra[1..100] of integer;
begin
write('Введите кол-во четных элементов');
readln(n);
summa:=0;
for i:=1 to n do begin
write('Введите ',i,' элемент:');
readln(A[i]);
summa:=summa+A[i];
end;
srednee:=summa/(n div 2);
writeln('Среднее арифметическое',srednee:3:2);//
readln;
end.
2 вопрос 3 способа 1 из а в з из а в б в д в е в з и внизу также