Ошибки в программе:
Program primer - не хватает точки с запятой
Var a,b: integer;
Begin ; - не ошибка, необязательная точка с запятой
ReadLn( a,b); - не ошибка, лишний пробел после скобки, здесь и дальше не хватает пробелов между аргументами функций, знаками
s=a+b; - не хватает двоеточия в :=
m:=a*b;
d:=a:b; - переменная d не была описана; деление - это /
WriteLn(s);
WriteLn(m);
WriteLn(d)
End - не хватает точки.
Исправленная программа:
Program primer;
Var a, b: integer;
d: real;
Begin
ReadLn(a, b);
s := a + b;
m := a * b;
d := a / b;
WriteLn(s);
WriteLn(m);
WriteLn(d)
End.
#Python 3.8.3
from typing import *
def FindFirstIndex(source: Iterable[Any], predicate: Callable[[Any], Any]):
for index, item in enumerate(source):
if (predicate(item)):
return index
def main():
arr = [1, 2, 3, 4, 5, -1, 2, -4]
firstOdd = FindFirstIndex(arr, lambda p: p % 2 != 0)
firstNegative = FindFirstIndex(arr, lambda p: p < 0)
arr[firstOdd], arr[firstNegative] = arr[firstNegative], arr[firstOdd]
print(arr)
if __name__ == '__main__':
main()
Объяснение: