def cylinder():
r = float(input())
h = float(input())
# площадь боковой поверхности цилиндра:
side = 2 * 3.14 * r * h
# площадь одного основания цилиндра:
circle = 3.14 * r**2
# полная площадь цилиндра:
full = side + 2 * circle
return full
square = cylinder()
print(square)
Пример выполнения:
3
7
188.4
В данной программе в основную ветку из функции возвращается значение локальной переменной full. Не сама переменная, а ее значение, в данном случае – какое-либо число, полученное в результате вычисления площади цилиндра.
В основной ветке программы это значение присваивается глобальной переменной square. То есть выражение square = cylinder() выполняется так:
Вызывается функция cylinder().
Из нее возвращается значение.
Это значение присваивается переменной square.
Этот мой ответ и он официальный и копированию не подлежит! ©
N = 13;
Var
A:array[1..N] of integer;
i,C:integer;
Begin
Randomize;
Write('Исходный массив:');
For i:= 1 to N do
Begin
A[i]:=random(N);
Write(' ',A[i]);
End;
WriteLn;
Write('Введите число: ');ReadLn(C);
i:=1;
While (i<N)and(A[i]<>C) do
Begin
i:=i+1;
End;
if A[i]=C then WriteLn('Номер элемента, равного ',C,': ',i)
else WriteLn('В массиве нет таких элементов')
End.